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Standard QL replacement keyboard, with black 
enclosure 

Anti-bounce device for standard keyboard £5.50 
PS/2 Style 102 key replacement keyboard, with 
interface board and black housing 


KBL 128 all-purpose computer enclosure 
64 way <Flip back» connector for KBL 128 


All the above items come with full instructions 
All prices inclusive of VAT 
P&P free of charge in U.K. & N. Ireland 
(phone or write for details of cost of shipments abroad) 


Send your order, with cheque or postal order, to: 


KEYBOARD PRODUCTS LTD 
UNIT E2, WELLAND IND. ESTATE 
VALLEY WAY 
MARKET HARBOROUGH 
LEICS. LE16 7PS 
Tel: 0858 410048 Fax: 0858 66786 


SINCLAIR 


C ONTENTS 


WORLD 


Editor 
Helen Armstrong 


M@ W@ NOVEMBER 1990 % 


Production Controller 
Jayne Penfold 


QL SCENE @ New programs from Wales 

Designe: 
ey ee el OPEN CHANNEL @ Good service 
ede eel ram 1K QL SCENE @ Digitiser expected 

17S PROGRAM TIP @ Printing from Flashback 

it: DIY TOOLKIT @ Fast diskcheck 
Advertising Production 
Michelle Evans yy TROUBLE SHOOTER @ Disks and spelicheckers 
Group Advertising Manager vies SUPERBASIC @ Arcade games in Basic 
Richard Vaughan 

y2:) PROGRAMMING IN C @ Part 2 
KS) ONE MAN'S SYSTEM @ From the Spectrum to BA 
THE PROGS @ 3-D Pie Graphics 
SUBSCRIPTION INFORMATION 


Magazine Services 
Sheila Baker 


Group Editor 
John Taylor 


Publishing Director 
Ray Lewis 


Managing Director 
Peter Welham 


Sinclair QL World 
Panini House 

116-120 Goswell Road 
London EC1V 70D 
Telephone 071-490 7161 
ISSN 026806X 


Unfortunately, we are no longer able to 
answer enquiries made by telephone. If 
you have any comments or difficulties, 
please write the The Editor, Open 
Channel, Trouble Shooter, or Psion 
Solutions. We will do our best to deal 
with your problem in the magazine, 
though we cannot guarantee individual 
replies 

Back issues are available from the 
publisher price £2 U.K., £2.75 Europe 
Overseas rates on request 

Published by Maxwell Specialist 
Magazines, A Division of MCPC Ltd., 
Sinclair QL World is distributed by SM 
Distribution 

Tel: 081-677 8111. Subscription 
information from: MSM Subscription 
Dept, Lazahold Ltd., PO Box 10, Roper 
St, Pallion Ind. Est., Sunderland SR4 
4SN 

£21.00 U.K., £24.70 Europe, MiddleEast 
£25.80, Far East £27.60, Rest of World 
£26.20, U.S.A. $45.00 


Airmail rates available on request 


Typesetting by Ford Graphics, ARCADE GAM ES c THE REALLY USEFUL 
Pon Whitsbury Road, Fordingbridge, _ at | ARCHIVE BOOKLET 
ampshire. SP6 1BR. Tel: (0425) 655657 IN SUPERBASIC To celebrate and abet our fresh assault 

P gy by Cradley Print ‘ 

Sinclair QL World ‘, published on the be - — . 5 75-stand d t QL 

third Thursday preceding cover date " on id S-S an S WEXTRA facts S, klet 
orid carries an ree DOOKIe 

about Archive on the cover next month. 


NEXT 


COPYRIGHT 
SINCLAIR QL WORLD - 1990 


WELCOME TO THE WORLD OF DIGITAL PRECISION SOFTWARE ....». 


PC CONQUEROR WITH MS-DOS PROFESSION LISHER 


PC CONQUEROR ProPub is the state of the art QL 


PC Conqueror addresses and answers the QL desktop publishing system. It can 
problem of IBM PC compatibility faced by handle user-input text and drawings 
many QL users. Boot up your QL with PC in a huge variety of fonts, sizes and 
Conqueror, and under 10 seconds later styles, as well as import from Quill, 
your QL will be a pretty compatible PC! Editor, Eye-Q etc. This isa very 
This has been accomplished by our very user-friendly DTP program - most of 
meticulous and painstaking emulation of its controls are intuitively obvious, 
the functionality of a PC clone, down to but there is context-sensitive help 
the very operation of the 80x86 family available at every stage. Pixel 
of microprocessors! But you do not need proportionality, configurable space 


to concern yourself about how we've allocation between characters 7 
managed it - Conqueror works. It can words, honouring of bold/italics/ 
read, write and format PC disks, run PC underline (+ other embedded commands) 


operating systems (including MS-DOS and in the source text, word-wrap (text 
DR-DOS, also Unix-clones + p_ system), boxes can be of ANY shape), v-easy 
move data QL<->PC and can multitask. In shadowing/brushwork and a detailed 
a full review in the May issue of QL manual all combine to make this a 
World PC Conqueror was found to be very spectacular system, ideal for pros 
compatible - "every program I tried with and beginners alike........---- £8995 


Conqueror worked satisfactorily". On 
FONT ENLARGER 


the subject of speed, QL World found 

Conqueror clocked in on average at 60% 

of the speed of a PC, even without 

user-tuning Conqueror's performance (a This ProPub accessory enlarges fonts 
(80+ with Lightning SE, 20+ with 
ProPub)) to sizes of -your choice 
without any jaggedness........- £195.95 


feature we put in for knob-twiddlers!). 
The price is £89.95, and add another £50 
in order to get MS-DOS v4.01 too. 


SOLUTION WITH MS-DOS 
SOLUTION DESKTOP PUBLISHER 


If your purse cannot stretch to ProPub, these 
are the best desktop publishers for the QL. The 
Special Edition has bigger fonts, more features 
and is easier to use - but both allow you to 
produce classy dot-matrix output. The standard 


one costs £24.95, the Special Edition £39.95. 
Rar 


Pa 
SUCCESS CP/M EMULATOR 


CP/M was a_ popular O/S for Z80 machines. There 
are 1000s of good, cheap PD programs For “ve; 


| which Success lets you run on a QL. Just £49.95! 


3-D PRECISION 


3DP allows you to 


create & manipulate 
any 3-dimensional ULTRAPRINT 
objects on screen: 


outputs dot-matrix 
& plotter....£49.95 


Solution is a pretty compatible 
PC Emulator, about half the 
speed of PC Conqueror. If you 
are on a tight budget, it is a 
snip at £39.95 or just £89.95 
including the full MS-DOS v4.01 


Eye-Q, a no-nonsense graphics 
program, is a joy to use. It 
matters not whether you need 
freehand work, diagrams, 
charts, technical drawing, it 
L ee it all. Eye-Q is £39.95. | 


(— 


SPRITE GENERATOR 


SSG allows you to 
create and move objects 
around a screen at high 
speed without flicker. 
No machine code at all 
| is needed! Just £29.95. 


Screen output to printer in 
20+ styles/sizes for £19.95 


ee genes + +--+ + 


PERFECT POINTER TOOLS 


This excellent program gives 
you an on-screen pointer 
(arrow) environment and all 
the tools you are likely to 
need to run it. Run your QOL 
this way now for just £29.95! ) 


TURBO BASIC COMPILER + TOOLKIT 


Turbo is the supreme SuperBASIC compiler for the 
QL: stunningly fast, it produces code to run 
typically dozens (sometimes 100s) of times faster 
than interpreted SuperBASIC. When compared by QL 
World with "another product" it was Turbo that 
was found to be more SuperBASIC compatible. The 
toolkit provides a valuable extension to the 


functionality of the QL, and complements other 
toolkits. Turbo complete with toolkit is £99.95 | QKICK MULTITASKER 
la A pull-down menu controlled 
SUPERCHARGE BASIC COMPILER 


multi-tasking program, ideal 
for running in the background 
Supercharge is half the speed of Turbo and lacks and giving you notepads, file 
many of Turbo's advanced features. A budget buy 
at £29.95, though. The quality is excellent. 


handler, clock, diary, mini- 
database, calc etc for £24.95 


he 


( — 
TOOLKITI yy Ef QFLICK CARD INDEX SYSTEM 


Virtually everyone with a disk Few users actually require all the facilities 
system has TK2 Supertoolkit on- of a sophisticated database like Archive. 
board. Toolkit III takes off QFlick presents a very convenient alternative - 
where TK2 ended, greatly a very fast card-file database, with easy to 
increasing TK2's power (even learn snappy search and navigate commands and 
Sorts!). Toolkit III works good file-handling. You can move Archive data 
without TK2. This toolkit is to/from QFlick, and run multiple copies of 
| for everyone with a QL..-£29.95 } PerFetek in the background. A good buy at £29.95 } 


==, 


DISKTOOL + QUICKDISK 


An exciting way to accelerate disk 
access, add password protection and 
to optionally increase disk storage 
capacity by 32K! This multitasking 


LIGHTNING SPECIAL EDITION 
LIGHTNING 


Lightning Special Edition is a program 
which will make your QL run over twice 
as fast as normal, with no side effects. 


utility can do much more - an ideal It will give your machine a professional 
\_ complement to Media Manager....£19.95 } - and very new - feel to it, as things 
will happen quicker, screen ouput will be 


ae By snappier, internal computations will be 
BETTER BASIC faster. Lightning SE does this quite 
automatically - no particular knowledge 

Better Basic 1S an expert system or skills are required by you. The 
which will improve your BASIC program installs itself on your boot-up 
programs - or those you type in - no cartridge(s) or disk(s), just like a 
end. Will even help experts! £24.95 |} benevolent virus. When you then boot up 
your QL, Lightning SE auto-installs 
itself. Thereafter all you notice is 
very increased operating speed on the 
part of your QL. Lightning also adds many 
new commands to the QL's' repertoire, 
including new types of »serolis,» the 
facility to change fonts, colours etc in 
existing programs (Quill included!) and 
lots more. It is a magic wand you must 
not afford to be without! A cut-down 


x 


PROFESSIONAL ASTROLOGER 
PROFESSIONAL ASTRONOMER 


A complete Astrology and Astronomy 
system for beginners and experts 
- the manual teaches you everything - 
producing dozens of pages of personal 


data, forecasts, predictions and 

compatibility test results. The standard version costs £24.95 and the 
astrology module costs £59.95, the super full-speed, full-function Special 
astronomer £29.95 - save £20 if you Edition costs just £49.95: it is the best 


\_ buy both. A world-beating program! |} program ever for the QL, bar none. 


DIGITAL C SPECIAL EDITION COMPILER 
DIGITAL C COMPILER 


Std Digital C (£29.95) is a high-speed C compiler. 
The Special Edition (€49.95) is even faster, and has 
structures, long pointers/integers, no 64K size 
limit, direct QDOS access, separate QL/C libraries. 


Monitor allows you to 
trace the operation of 
machine code programs as 
they run. Breakpoints can 
be set. A snip at £19.95! 
== 


al 


GAMES COMPENDIUM 


BACKGAMMON * There are five new programs in 


DROIDZONE stable - Toolkit III, QFlick Card Index 
System, QKick Multitasker, Disktool with 


BLOCKLANDS Quickdisk, and Perfect Pointer Toors = 
REVERSI all created by Ultrasoft. 


ARCADIA * Our  non-game programs are very 

comprehensively documented with A4 
Backgammon is a_ friendly companion, manuals averaging about seventy pages in 
Reversi a powerful and intelligent length (the largest is 325+). They are 


4-hole punched for easy binding/ storage. 
* Microcartridge users please note: don't 
panic! we have large stocks of 
microcartridges and we are NOT going to 
run out. Quality software on cartridge 
will continue to be available from us for 
the foreseeable future. You can buy 
cartridges from us at the rate of £19.95 


| fox a set of five cartridges. 


TRANSFER (eansrerututy _)) 


If you have a disk system but 
still have programs on 

cartridge that assume mdv is 
the device name, this program 
will move them across without 
g hassle. Damages only £9.95! 


adversary well versed in alpha-beta 
search methods. Blocklands sets you 
free in 7 3D world measuring 
256x65536 QL screens. Droidzone is 
a zap-em-up game faster than any 
other. Arcadia is a2 in is: BMX 
Burner reminds one of JetPac, and 
GridRacer is like nothing else! Each 


game, is £9.95: £29.95 buys the lot jj 


A 
SUPERFORTH COMPILER 


Superforth is a beautiful FORTH-83 compiler for 
the QL. It produces stand-alone, very fast FORTH 
code which you can EXEC or EXEC W: the official 
specification for the language is very greatly 
exceeded. FORTH is a very rewarding language to 
learn, and the supplied manual is a a complete 
tutorial for FORTH, assuming no knowledge at all 
and taking you through FORTH one step at a time. 


ee whole Superforth system will cost you £39. iat 


eee | If you have no real interest 

in astrology or astronomy but 
ADVENTURE CREATION TOOL SE “aie “a -Spogkam to have soa 
fun with, this one is just 
ideal! You might just learn 
| something LOO. «(2 «ONLY £24.95 | 


This £49.95 program is NOT just for creating 
adventures but is for everyone who wants to write 


in BASIC. A treasure trove of utilities...-- 


EN 


ee | , —<$$$$=_— 


Microbridge is a good standard Contract Briage 
bidder, player and master tutor, providing 
non-intervening opponents as well as a partner 
well-versed in Acol. It can show its reasoning 
for bids on screen 4-5 lines of conversational 
English! The program doesn't cheat (each hand 
is managed independently, making deductions 
| from bids and play just like humans) ...-- £34.95 


graFix is specifically designed 
for output of screens and DTP 
pages (from all our publishers) 
onto 24 pin printers: advanced 
features such as interpolation 
(x & y) and magnification (also 
x ..& oy) are provided. A vital 
| ProPub accessory for just £9. 95 } 


MEDIA MANAGER SPECIAL EDITION 
MEDIA MANAGER 


MMSE is a joy to use. Whether something has 
gone wrong with a_ disk or tape ("Not found", 
"Not avalid Quill file", "Bad or changed 
medium", "Read/write failed" etc) or whether 
you want better control over your programs 
and data, MMSE should be to hand. Virtually 
any calamity can be recovered from 
automatically: all permutations (accidental 
deletion, partial overwriting or formatting, 
errors yielding: bad map but OK directory, 
bad directory but OK map, bad map and 


EDITOR SPECIAL EDITION 
EDITOR 


Not just a word processor - more 
a way Of wire: The Editor 
Special Edition (SE) is a super 
powerful data management tool, 
whose simple-to-master user 
interface was. the result of 
many months of careful design. 
Absolute consistency of control 
and operation is its hallmark. To 
illustrate this, ALL Editor 
commands have exactly the same 


structure - verb, followed by a directory, OK map and directory but bad file 
separator (any one of your sectors, unknown fault, power glitch 
choice) and one or more optional corruption and so on) have been catered for. 
nouns (if more than one, It isn't just for when things go wrong, 


either - many useful utilities are included. 
MMSE costs ..4just ~£49.95, or £24:95 for: a4 
cut-down std version that is less friendly. 


separated by the same separator): 
so. .F/and. will Find: ‘the first 
occurrence of and after the 
cursor. You can even put your 
commands into files and then 
execute them like programs. 
Multi-columnar work is easy. You 
can run many copies of Editor 
simultaneously, with overlays 
on-screen or with split screens. 
The standard version is £29.95 
and the Special Edition (faster, 
twice the features) costs £49.95 
with a clear, 160 page manual __} 


IDIS SPECIAL EDITION 
IDIS DISASSEMBLER 


Ordinary disassemblers are almost useless, 
requiring detailed knowledge of the program 
being disassembled (Catch-22). IDIS is an 
intelligent disassembler and gives you nearly 
eee output for £24.95 - the Special Edition 


goes much further and costs only £39.95. 


= 
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SPECIAL LIMITED PERIOD OFFER: ACT NOW 


ive, For the 


asers - the 
0 the quoted 


T 
rc woted figures are all-inclu 
a. Hi pt a ¢ Me (reat of Me wre, hy } 
{igu a fo arrive at free total (ekports are zero-rated 
gt Mm alt freight and documentation charges 
yt HI e forms of fanaa are P tering cheque drawn ona 
ranch of a bank or ul iding a Sterling postal order, 
urocheque ns °t out Fogtt § ‘i international goney. order in 
sterling RD / specify, expiry 
date), cash, boteign arta fg a ony (OR ch aire) 
Hee i ope] transfer to Mt si PREC ON LTD at 
nf a code 20- *y Chingford Branch, 


* Buy ANY TWO programs 

get 10% off the total price! 
* Buy ANY THREE programs 

get 15% off the total price! 
* Buy ANY FOUR programs 

get 20% off the total price! 
* Or buy FIVE or more programs 
get 30% off the total 


C k 
J hae ond Roun Rd Loner 
0 upgrade from one version of a sane to a superior program, 
send us the castrigger aise, t Freep tin the case of upgrades 
eg prograa versions both with the same name, send the manual 
o. The cost of an upgrade is £10 plus the difference in current 

averted pgice. between the two free raas. 

’ Pig tal vier is a trading name of DIGITAL y ISION 
LIM ” Reg, 0. 70). registered in England & Males. 
and requiremen a or. our software, 
ay it issues of 


price! 


This is a very generous offer. Please 
oe Lt. white sty lasts es. <<. 


or details 
% sleatt consult the iorild 


To: DIGITAL PRECISION LTD Or telephone 
222 THE AVENUE, LONDON E4 9SE ORDER COUPON 081-527 5493 


Please send me: 
Name: Address: 


Ra ah i I Oe a ee 
Enclosed: CHEQUE/PO/CASH/VISA/MASTERCARD/ACCESS/EUROCARD for & Signature: 


‘Sito fof gl "oi es eR SER Sad Pee MnmS = <<) "7 
| use: (QL/THOR) (MDV/3.5* DISK/5.25* DISK) (360/720/ 1440 SECTORS) da DIGITAL PRECISION, = 


PSION ORGANISER Z88 


LEZ BA vost thasys £180 Using Psion Organiser .....£10 ZBASC ..-..ccsccseseseeeeeeses- £69.00 Easy Money ........... ... £69.00 
Psion LX Book ..........-.......£15 Spelling Checker ............. £30 Spellmaster £59.00 288 Computer...........£230.00 
sec estiaeeal at - meee pp anor ek its ne ©50.00 Z-TOPM ses sessscvessseeeeeeees £50.00 
Centronics Interface ........£40 Psion Printer : : £230 Cambridge Topper . £8.00 Superchip 4 ......... £150.00 
Organiser LZ ........::..++-£150 File Handling Book £15 Centronics interface ....£30.00 128K Eprom.............. £50.00 
128k Datapak........ ..£100 32K Datapak....:........1:.....£39 128K RAM Pack .£50.00 Z-Tape ..... £50.00 


COMPUTERWARE 


the QL stockist 


Tel: 0303-81-2801 


SOFTWARE 


PSION MC 


SOFTWARE 


128K Flashcard ...................£79.00 


512K Flashcard :.....:.::.-4- £224.00 £29.00 
64K Ramcald .........sceeeee £68.00 pa eis 


128K RAM Card ..........0++ 


er 2 


Astrologer 


SPARES 
JS ROM SETS PAA he a 
Keyboard Membrane .........+:+1+ £7.25 g 
ULA ZX8302 ..... ey Ai teta ae Ute £30.00 Wa t (set) £ 
£30.00 g 
es £50.00 g 
zi 
= £25.00 £ 
Repairs ......... alae g phone ye oo " 
/drive assemblies-complete ....£27.50 £25.00 e 
¢ 


£50.00 
£38.00 
£99.00 
£50.00 


war) 


Voltage regulator (high output) ....£4.75 
Power supply UK.............+ ... £28.50 
QL Test kit .. asteist ..£13.50 
/drive assemblies (xchange) 


Archive 

QFLASH Rarr 
QFLASH Rar 
QFLASH R 


Reconfigurable toolkit 2 £29.00 


LANGUA 


5.00 Asser 


GES 
(Cor 


£20.00 


BOOKS 
788 Dabhand Guide....... £16.00 


Assembly Language Prog ....£9 


15.00 MonQL ... £30.00 Patience £18 


Z88 Ref Manual ...............+ £16 py as : ; 

QDOS Companion ..........++ ae) Please telephone for details of other products not listed here @ 
GSI MAGIC « o.tecencxyssierer-t susncs £16 

QL Service manual ............. £25 

Z88 Pipe dream ......... £16 

Using Your Z88 ............:++ £10 

LOG COMBULING s:2.00 vcsctetenren £10 


788 Software DLV Guide ....£40 


ALL PRICES INCLUDE VAT. U.K. POSTAGE £2.50 PER ORDER. - WE EXPORT WORLDWIDE 
Phone for details of other QL products OR send SAE for our latest catalogue. 
Credit card phone orders accepted, or send cheques, postal orders, Eurocheques, to: 


AMERICAN 
EXPRESS 
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Dilwyn Jones Computing has 
supplied QL World with in- 
formation on five programs 
which the new company isnow 
marketing. 

Dilwyn Jones is already well 
known toestablished QL users 
as the author of Page Designer 
2, published by Sector Soft- 
ware, and other programs in- 
cluding some in the public do- 
main. He hopes to establish 
himself as a QL supplier after 
some success with his pro- 
grams through private adver- 
tising. 

QL Basic Reporter is a pro- 
gramming utility for pro- 
grammers in SuperBasic and 
compiled Basic. It has a vari- 
ety of listing and reporting 
functions to list variablenames, 
types, procedure and function 
namesand lines, machine code 
extensions and execution ad- 
dresses, and others. All lists 
can be sorted into alphabetical 
order and printed to the screen 
or any QL device. The pro- 


gram is useful among other 
things for finding typos and 
variable name clashes in list- 
ings. The program runs on an 
unexpanded QL and is de- 
signed to be easy to use. Basic 
Reporter is £10 including 
manual and EEC postage. 

QL Vision Mixer is a screen 
sequencer for display and ad- 
vertising. Screens and graph- 
ics can be loaded from just 
about any QL source, and then 
displayed at random or froma 
menu sequence, with speed 
and pauses user definable, in- 
cluding key-stepped displays. 
QL Vision Mixer needs at least 
256K of expansion, and costs 
£10 including EEC postage. 

QL Quick Posters is an aid to 
laying out text-only display 
sheets quickly. It exploits 
many little-used printer facili- 
ties. Designed for use with 24- 
pin printers — printers capable 
of doing enlarged text and with 
a choice of fonts are the most 
likely candidates. The program 


Assistance from 
Archive Author 


Two mistakes have come to 
lightin the Archive Power series, 
for which I must accept re- 
sponsibility. The first is an er- 
rorin the June 1990 listing, p34, 
towards the end of proc 
NOTEPAD. The line com- 
mencing ‘if OPTION=4: error 
PAGETEMP: ....’ should read 
‘if OPTION=4: error 
PAGEPRINT: ....’ Then in the 
August 1990 issue, in the text 
on page 37, there is a list of 
procedures to be included in 
the calendar program. This 
includes the non-existant pro- 
cedure GETSEDIT . It should 
have been GETSINPUT. Sorry 
to anyone frustrated by this. 
Some readers have also found 
difficulty getting the program 
to run at all, due to confusion 
over how to save a program in 


object format. If you save a 
program in the normal way, 
by typing SAVE “MYPROG”, 
it will be stored as a text file, 
with the name 
“MYPROG_PRG”, and ifitisa 
long program it will take an 
age to load even from disk. 
However, Psion also allow 
saving ina ‘tokenised’ format, 
with the line SAVE OBJECT 
“MYPROG”. The file will then 
have the name 
“MYPROG PRO”. The main 
programs (NOTE PAD, CAL- 
ENDAR and TODOLIST) 
should all be saved with this 
object form of the save com- 
mand, to make use of the rapid 
loading it provides. If youhave 
not done this, you will get an 
error message when July’s ini- 
tialisation program is run, say- 


Sinclair/QL World November 1990 


has no fonts of its own, but will 
improve the quality of large- 
size text, add borders, preview 
on-screen, load and save, and 
has a freely reconfigurable 
printer driver. A sample 
printout froma Star LC24-10is 
available from the publisher 
with an sae. Quick Posters 
costs £10 including EEC post- 
age. 

QL Wordscheck takes any 
Ascii or Quill _doc file and 
provides a total word-count 
and the number of different 
words used. Output can be 
sent to screen, printer or file. 
The output can be given a 
number of user-definable 
variables such as a count of 
words over a certain length. 

Wordscheck runs on an 
unexpanded QLand can multi- 
task. The price is £6 including 
EEC postage. 

QL Home Budget is an un- 
dated version of the already- 
established finance, income tax 
and capital gains tax calcula- 
tor. Personal expenditure and 
bills can be entered as a number 
of accounts with itemised pay- 


The All Formats Computer Fair 
will be taking place again at the 
New Horticultural Hall, 
Greycoat St., Westminster, 
London on Saturday 1 Septem- 
ber and Saturday 4 November. 

A report reached QL World 
and its sister magazines that 
one trader reached the July fair 
with several thousand cassettes 
for various computers, ex-stock 
of from a retailer which had 
closed down. The haul was 
said to include around 2000 


ing ‘cannot open file’. The so- 
lution is simple. From the Ar- 
chive command line, simply 
enter LOAD ‘NOTEPAD?’ fol- 
lowed by SAVE OBJECT 
‘NOTEPAD’ and then try run- 
ning the Desktop program. 
Robin Stevenson 


ments. The tax calculator as- 
sists in calculating personal in- 
come tax for any year from 
1883/4 onwards, and includes 
separate taxation for married 
couples. Changes in taxation 
rules can be user-updated. It 
also covers “indexed” asset 
costs for capital gains tax pur- 
poses. 

The current version ad- 
dresses points raised in the 
May 1990 QL World review, 
plus extended error-trapping 
and multitasking using EXEC 
and CTRL C. 

Home Budget costs £20 in- 
cluding EEC postage. It is 
QLiberated and runs on an 
unexpanded QL. 

Postage outside the EEC area 
will be added at cost. All pro- 
grams are available on mdv, 
3.5 in disk or 5.25 in disk, and 
have printed manuals with the 
exception of Quick Poster, 
which includes instructions as 
a Quill doc file. 

Enquiries to Dilwyn Jones 
Computing, 41 Bro Emrys, 
Tal-y-bont, Bangor, Gwynedd 
LL57 3SYT. 


) THe SUMMER 


ALL FORMATS 


~~ COMPUTER 
FA JR 
The show for the enthusias/. Thousands of bargains. 


ATUR 


Greycoat & Elverton Street_1)>) 
London 


mdvs of unidentified QL soft- 
ware, which was “all gone by 
2am”. Windfalls like this are of 
course unpredictable, but QL 
visitors must have thought it 
was Christmas. 

For advance £3.00 tickets and 
information, contact Mike 
Hayes, 9 Midgrove, Delph, 
Oldham OB1 5EJ, tel. 0457 
875229. 


Open Channel is where you have the 
opportunity to voice your opinions in 
Sinclair QL World. Whether you want to ask 
for help with a technical problem, provide 


Irecently sent my Minerva rom 
for upgrade. The postman en- 
sured that the rom pcb stapled 
itself and the rest of the pack- 
age contents together. QView, 
however, replaced the pcb at 
no extra charge, and returned 
my upgrade eight days later. 

Having installed Minerva 
1.82, found that Supercharged 
programs would nolongerrun. 
Phone calls toStuart McKnight 
of QView and Freddy Vachha 
of Digital Precision ensured. 
Stuart explained the changes 
to Minerva which makes it less 
tolerant of programs which 
circumvent Qdos, and Freddy 
explained to me the reasons 
behind the incompatibility and 
my options. He then offered an 
upgrade to Turbo with a trade- 
in allowance of £30 for 
Supercharge. This was on top of 
the generous package dis- 
counts. 


Both Stuart and Freddy | 
found to be helpful, informed, 
enthusiastic and shared my 
loathing of the IBM PC. At work 
lam forced to use an XT clone 
with PC Write and Perfect 
Writer, where reformatting ofa 
large document, line by line, 
could take all day. This is 
something that the QLrunning 
DP’s The Editor would usually 
achieve in about 30 minutes; 
five minutes, if I could fit Mira- 
cle Systems’ 68020 prototype 
board. 

My thanks to Tony Tebby, 
Jan Jones, Quanta, QView, 
Digital Precision, Miracle Sys- 
tems and QL World for making 
the QL what it is. 

B R Seidel 
Manchester 


Further toa reader query about 
Dir_To_Archive_Bas, | have 
suggested that he check his 


somebody with the answer, or just sound off 
about something which bothers you, write 
to: Open Channel, Sinclair QL World, 
116/120 Goswell Road, London EC1v 7QD. 


typing especially in procedures 
read_tempdir in lines 580 and 
680 and open_file in lines 370 
to 440, as these lines may have 
been mistyped. It is critical that 
there are no omissions of semi- 
colons, backslashes, quote 
marks or ampersands as these 
are essential to the running of 
the routine. I have checked the 
listing as published and it is 
right. 
Terry McKnight 
Walkden, Manchester 


Thank you for publishing my 
program Chemistry in the Sep- 
tember issue. I had given up all 
hope of seeing it in print. How- 
ever, on checking the listing, | 
found an omission in line 750. 
After the last character on that 
line there should be two spaces 
and a “close of string” indica- 
tor ( ’). The line should look 
something like this: 


750 PAPER 4,2: INK 7: AT 2,74: 
PRINT ‘ He ‘: AT 3,74: PRINT 
‘ v ‘ 
This was probably spotted by 
many readers as the line would 
not be accepted by the QL 
without the final character, but 
I would like to point it out any- 
way. 

A similar gremlin also at- 
tacked lines 1750 and 1770. 

Also, if anyone has compiled 
the rest of the program, then 
the absence of a “Quit” option 
forces the user to reset the OL 
to escape. This may not be the 
case when using a front-end 
utility (I still don’t own one) 
but it is an obvious omission. 
Adding the following lines 
provides the necessary func- 
tion: 

Change line 1840 by altering 
opt$>’3' to optS>’4’ 

Add: 


1805 PRINT: PRINT ‘4) Quit 
CHEMISTRY’ 
1875 IF opt$=’4’ THEN : quit 


1882 DEFine PROCedure quit 
1884 CLS: AT 10, 10: PRINT 
‘Bye’ 

1886 PAUSE 300: CLS: STOP 
1888 END DEFine 


After RENUMbering, the last 
line should be 3040. 

The program still runs fine 
without this little addition, and 
runs and compiles successfully 
withit, even if parts of the code 
make some programmers 
wince! 

On a different note, I would 
just like to add all the usual 
stuff about the magazine being 
wonderful, keep up the good 
work, will anyone produce a 
‘proper’ QL Mark II and sup- 
port for us all now? 

I also hope that this letter 
meetsat least 50% of the wishes 
which Bryan Davies expressed 
in September's Troubleshooter. 
It hasn’t been checked by any- 
thing other than myself. There 
is only one deliberate spelling 
mistache; anything else must 
be Monday Morning Blues at 
the typesetting office. 

Ian Thompson 
Ripon 
Yorks 


Editor's comment: Probably Fri- 
day Afternoon Blues. 


[have heard on and off about the 
lack of a suitable mouse for the 
QL. I find this surprising as I have 
a mouse from Jochen Merz soft- 
ware here in Germany. It works 
perfectly, and I have had good 
service from Jochen; I see he now 
advertises in QL World. linstalled 
theinterfacemyselfand if lcando 
it, it cannot be very difficult. 1 
mustsay that] sweated a bit butit 
turned out well. The main com- 
plication came from the Schon 
interface, which normally inter- 
feres with it, but I put ina couple 
of spacers to lift it up. 
Peter Lund 
Munster, West Germany 
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QL SUPERTOOLKIT II by Tony Tebby 


Over 118 Commands:— Full Screen Editor, Key Define Print 
Using, Last Line Recall, Altkey, Job Control, File Handling, 
Default Directories, Extended Network. 

16k Eprom Cartridge Version . @E 24,15d 
Configurable Version on Microdrive G@E£ 24.15d 


MIRACLE SYSTEMS PRODUCTS 


OK Disc Interface (inc TOOlkit Il) ........:ccesreresereenneseere @£ 99.82b 
QL Centronics Printer Interface G@€ 28.75d 
QLExpanderam 512K Thrucard ... ..@E£ 99.99e 


QL HARDWARE 


Single 3.5” Disc Drive & (Own PSU) .........0cseseesesesneee @£103.50a 
Dual 3.5” Disc Drive & (Own PSU) . .. @£188.60a 
3.5” DS/DD Discs — 10 Off........s.sessccsssecsssseesesssesenenes . @E 9.20 
Q POWER REG. The only real solution to your OL overheating 
(switched mode power supply run cold) ...... G@E£ 24.15¢ 
QL Keyboard Membrane ........ “S wu @E 11.50d 


QEP Ill Advanced Eprom Programmer ; Se ...@£121.90d 
Care Eprom Cartridges @8ch ........ecsessseereneneee @E 5.75¢ 
ULA CHip Z2X8301 @E£ 15.64c 


STARLC10 Mono .... 
STAR LC10 Colour 


..@£179.40a 
@£224.25a 


TONY TEBBY SOFTWARE (QJUMP) 
QOLFP (Micro/P disk interface upgrade) 


, @ 1 i ht f ff 
Fron ress sorrwane our) 


@E£ 14.95d 
..@£ 23.00d 
QTYP Type/Spell Checker ..@£ 29.09d 
QPAC 1-Desk top accessories, calender, alarm, calculator, 
typewriter, digital clock SYSMON.........000.0:sseseeenerenes @£ 21.85d 


ZITASOFT SOFTWARE by Steve Jones 


LOCKSMITHE copies M/DRIVE — M/DRIVE ..@£ 14.95¢ 
A4MATTER + LOCKSMITH copies M/DRIVE — DISC .. @£ 23.00c 
The above programs are not for use in the UK 


SIDEWINDER — High resolution printer driver prints full 
screens or parts of screens from postage stamp size to large 
banners. Prints sideways, invert, scale, mirror, text insertion.... 
@£ 19.95¢ 

SIDEWINDER PLUS -— (for expanded QL’s) includes all the 
features of above, PLUS multiple label printing, desktop 
publishing files and printer driver for 24’ pin plus LC10 and J 
80 colour printers. (Please state 3.5" disc or M/D).... @£ 23.00c 
Upgrade to Sidewinder PIUS ...........--..--essreeseneensenes @E£ 8.05c 


HEAT TRANSFER RIBBONS & PENS 


Print your own T-shirt Design. Just print on paper and iron onto 
your Tshirt. 


» 


QPAC Il 


QPAC II Main menu windows adjust 
automatically to size. Files, directory, 
view, print, delete, backup, jobs, 
pick, Rjob, sort, channels, things, 
exec, wake, buttons, Hotkey, Hot- 
jobs. Fully multitasking, allows 
many programs to run at once 

Requires min of 256k expanded 


MEMOTY oneeseesessecesteeesreree@E 49.91D 
Upgrade QRAM to QPAC Il return 
MEBLOL, .0.ncacceccecscssensesarereee @E£ 29.90b 


AS REVIEWED OL WORLD 
AUGUST ISSUE 


OPEN 


a» ®’ By BY YB DN 


FOUNTED839.. ..@E 15.00 


FOUNTEXT 88............. wv @E 25.00€ jumbo 5 Colour Pen Set........ Bee oN ae eG OG 
TEXT 87/FOUNTED 89/FOUNTEXT 88 .@£ 94.99b 
2488 PRINTER DRIVER. ...........0e00eeeeeeeeee secessarsesevees @E 15.00C 
Upgrade to Text 87 V.3.00. Return old copy together 
GONE cand cst th sce ck cd Dinrsenmitarocesennnanailt cvantennnmete ....@£25.00d The QL drawing program 800 ST ALBANS ROAD, 
MONITORS (Price including lead) by PROGS. Fully multitasking ..........0sssessesrseneeneseeees @f£ 37.95c GARSTON, WATFORD, 
Philips BM7522 Amber Hi-Res .......... (@£ 97.75a READYMADE LEADS HERTS, wD2 6NL. 
Philips CM8833 Colour Med-Res (4 £253.00a Ti I: 0923-6721 02 
Phili el: 
\ilips AV7300 TV/tuner for above ....... “@£ 69.00b RGBOLtoPhono @E£ 5.76¢ 
Philips BM7502 Green Hi-RES «.....0.---- £97.75a RGB8-6pinDIN @E 7.13¢ Fax: 0923-662304 
RGB 8-7 pin DIN (Hitachi) @£ 7.13¢ 


HOW TO ORDER: ALL PRICES INCLUDE VAT 


text°’” 


text87 version 3 .OQoffers today's state-of-the-art user- 
friendly environment for document production. Extremely fast in 
operation with documents of any size and capable of mixing and 
displaying different type styles and sizes. With integrated spelling- 
checker in three languages and extensive support for highest 
quality printing possible on daisywheel and 9-pin printers. 


text87b udge f, has all the features of text87 version 3.00, 
the only limitations is that it cannot be used with 24-pin and laser 
printer drivers. Upgrade to the full version will be availabe at the 
price difference. 


text87:£60 @ text87budget:£45 @ fountext88 + founted89: 
£40 @ 2488: £15 @ typeset90-deskjet: £20 @ 
typeset90-laserjet: £40 © typeset90-GQ5000: £40 


Software is available in English, French, German and Italian. Prices 
are inclusive of airmail. Payable by cheque, Postal Order or 
Eurocheque. Please specify language and disk system (all 31/2" and 
51/4" formats can be supplied). text87 requires at least 256K memory 


Software87, 33 Savernake Road, London NW3 2JU 


pba Fr eh cae --@£356.508 Star C10 NX1000, Rainbow «.-....--- seeeusnun @E 17.250 9am-Spm Mon-Thu 
SOFTWARE 87 (State MDV or Disc) Star LC10 NX1000, Black .......--» I Q) 9am-4pm Fri 
Epson FX80, MX80, LX80, FX100/ Okidata ML80 AX 
TEXT 87 V.3.00 ...ccsssssssssesessesnssessennnnnnersnannnennnnsnscntens @E£ 60.00d Citizen 120D/Star NX10, Black ..... es ..@E£ 11.50¢ 


Small 5 colour pen Set... sabesoscistsscisamnp as Tee 


RGB 8-7 pin DIN (Ferguson) 
RGB 8 pin to SCART (Euro) 
6-way PCC 25-way ‘D’ (Printer-Ser 1) 


By Post. Enclose your Cheque/PO made payable to CARE Electronics. 
Or use ACCESS/VISA. Allow 7 days for delivery S 


The Advanced Wordprocessor for the Sinclair QL 


Please add carriage 
a=£11.50 b=3.45 
c=£1.38 d=£2.30 


@£ 7.13¢ 
@€£ 11,50¢ 
@E£ 9.89c 


i 
; 


Printer Drivers 


fountext88 and founted89 , the graphic printer-driver and 


editor for text87 provide graphic founts without the limitations in text 
editing and document size imposed by QL desktop-publishing programs. 
More than 35 quality founts of up to 72 pixels in height are supplied and 
new founts can be designed or captured from saved screen images. For 
Epson and compatible 9-pin and 24-pin printers. 


2488, the state-of-the-art text-mode printer drivers for selected 


Epson LQ, NEC P, Star LC and Panasonic KXP 24-pin printers offer 
advanced features such as multiple typefaces, proportional spacing, 
micro-justification, double height, shadow and outline modes (depending 
on the printer model). 


typeset90-deskjet text-mode printer drivers for Hewlett- 
Packard Deskjet and Deskjet plus support printer's internal founts plus 
the full range of Roman and Helvetica plug-in cartridges. 


typeset90-laserjet text-mode printer driver for Hewlett- 


Packard Laserjet series printers supports printer's internal founts plus a 
wide range of fount cartridges (incl. Roman, Helvetica, Universe) in 
sizes between 6 points and 72 points. 


typeset90-GQ5000 text-mode printer drivers forthe Epson 


GQ-5000 supports printer's internal scalable and bit-mapped founts in 
sizes between 6 points and 72 points. 
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Joe Haftke, author of Home 
Budget, has terminated a sales 
and marketing agreement with 
QL supplier PDQL as of 29 July 
1990, following the issue of the 
required legal notices, and re- 
quested return of all material. 
The marketing agreement with 
PDQL retained copyright tothe 
author. At the time of report- 
ing Mr. Hatfke has received 
no response from PDQL. 

PDOQL has been under a 
shadow in recent months fol- 
lowing a spate of complaints 
from customers, including re- 
ports of non-delivery of goods 
after payment, repeated fail- 
ure to meet delivery promises, 
and doubled charges on credit 
card accounts. 

Mr Haftke dates his growing 
dissatisfaction “with PDQL’s 
performance, or the lack of it” 
from some considerable time 
before a review of Home 
Budget appeared in the May 
1990 issue of QL World. 

An updated and improved 
release of Home Budget isnow 
available from Dilwyn Jones 
Computing, who now have 
sales and marketing rights. 
“The contrast is a pleasure to 
experience”, writes Mr Haftke 
of the new agreement. 

Enquiries to Dilwyn Jones 
Computing, 4 Bro Emrys, 
Tal-y-Bont, Bangor, Gwyn- 
edd LL57 3YT. Tel. 0248 
354023. 


Digitiser 


CL Systems proprietor C L 
Lang is proposing to release a 
new QL digitiser on the mar- 
ket in mid-October. 

The CQV1 real time video 
digitiser is designed to capture 
and freeze frames from a video 
recorder, camera or other PAL- 
compatible video source in real 
time (about 20 milliseconds). 
The frames thus captured can 
bestored, printed or loaded into 
desktop publishing programs. 
Some of the potential uses pro- 
jected by the manufacturer in- 
clude slow frame recording, 
video graphics to printer, and 
capturing images of 3-D objects 
for desktop publishing. 

The specifications include 
one odd or even frame in 


20ms, display rate 5 frames 
per second in quarter-screen 
mode, 2.7 fps in full screen 
mode, resolution 256 by 256 
pixels in eight grey levels, 
black level adjustment, dis- 
play merge (OR, XOR), invert 
and negative, full quarter or 4x 
quarter displays. The CQV1 
will run on mdyv, 3.5 in or 5.25 
in disk, on an unexpanded QL 
via the rom port. 

The projected priceis£120 plus 
£3 p&p. For further informa- 
tion, samples or specification 
sheet contact 403 Chapter Road, 
Dollis Hill, London NW25NG, 
Tel. 081 459 1351. QL World 
hopes to try out and review the 
CQV1 as soon as production 
models are available. 


C connections corrected 


Following last month’s 
backslash corrections to Pro- 
gramming in C, we have some 
more details to correct, mainly 
involving confusion between 
the uses of hyphens and un- 
derscores. 


In Fig. 2, line 3: Printf (“My 
first C program \ndisplays two 
lines”); 


On page 23, column 1: 


Line 34 device flpl_ use: 


Line 38 flp2_test -p -m (EN- 
TER) 

Line 41 code is in a file named 
flp2_test_c, that it ... 


On page 23, column 2: 


Line 5 _c doesn’t need to be ... 
Line 8 named flp2_test_obj 
Line 11 exec_w flpl_cg (EN- 
TER) 

Line 19 filenamed flp2_test_obj 


On page 23, column 3, line 2: 
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exec_w flp2_text_exe (ENTER) 


Fig. 3: 


Line 1 flp2_test_c> 
flp2_test_obj > flp2_test_exe 


And finally, a missing line on 
page 22, column 2, line 8: 


... compatible) environment, a 
Unix environment and a VME 
environment (the operating 
system ...) 


DataDesign by Progs - Van der 
Auwera is now available as a 
demo version for £3 or Belgian 
Francs 180 (cash or Visa). This 
version is said to have all the 
facilities of the operational 
package, except the Save com- 
mands. Potential users can ex- 
periment with the demo on 
their own machines before de- 
ciding whether or not to buy 
the program. 

Enquiries to Progs - Van der 
Auwera, Haachtstraat 92, 3020 
Veltem, Belgium. 


SQLUG 
celebrates" 


SCOTTISH 


QL Users Group 


NEWSLETTER 


Special FIRST ANNIVERSARY Edition: 


The Scottish QL Users Group 
(SQLUG) is entering its second 
year with a celebratory First 
Anniversary issue of its news- 
letter, appropriately known as 
the Special Edition. The anni- 
versary issue’s main feature is 
a series of historical articles 
about the QL. 

The Group meets monthly, 
usually for a software or hard- 
ware demonstration and dis- 
cussion. The September meet- 
ing, for instance, is scheduled 
to include a video digitising 
session and an in-depth look at 
PC Conqueror. 

The annual membership fee 
is currently £6 renewable in 
August, and pro rata at any 
other time of year. Enquiries to 
SQLUG, Alan Pemberton, 65 
Lingerwood Road, Newton- 
grange, Midlothian EH22400 


n enquiry from a reader 
about printing from 
Flashback and text” 
made the point 
which has often been heard in 
the past — users have prob- 
lems with printing, from any 
program. What may appear a 
simple procedure to an experi- 
enced user, can be unknown, 
or very complicated, to some- 
one who does not spend all 
day, every day using the QL. 
Here is what was suggested to 
this reader. 
You can print databases di- 
rectly from FlashBack, rather 
than going through another 
program. As FlashBack is flex- 
ible, it should normally be pos- 
sible to doany editing required 
within it. However, there is no 
great difficulty writing the file 
out in a form which can be 
edited in text*’, and subse- 
quently printed out there. 

Using FlashBack alone, the 
<CTRL-P> keying enables the 
sending of a database direct to 
a printer. If you key <CTRL- 
P>, you will be offered SER1 as 
the default device to print to 
and most users should accept 
that. You can choose PAR if 
using a Sandy SuperQ board 
with parallel printer port. 

The first illustration shows 
one record of a typical name- 
and-address database, after 
<CTRL-P> has been keyed; the 
program is waiting to be told 
whether or not the printer is 
connected (and switched on). 
There is one step to take before 
using the Print command, 
however — decide whether or 
not you wantto print the whole 
file. To print only part of the 
file, use the Group command 


PRINTING FROM 


FLASHBACK 


Bryan Davies offers assistance with 
printing databases directly from 
Flashback, or via text®”. 


first, toselect those records you 
want printed. 

You can also use the Xclude 
command after Group, to re- 
move odd records that meet 
the Group criteria but are not 
wanted in the printout. For ex- 
ample, to produce the printout 
in the second illustration, 
<CTRL-G> was keyed to acti- 
vate the Group command, the 
string <QL> was typed onto 
the input line, then the up-cur- 
sor key was used to set the 
FIELD number to 00 to ensure 
that records with <QL> any- 
where in them were selected. 
This latter action is important, 
because Grouping on any field 
other than 00 only works if the 
string you enter as the Group- 
ing criterion is at the start of the 
field, and the <QL> string was 
part-way through FIELD 04 in 
these records. 

Keying ENTER twice causes 
Grouping to occur, from the 
start of the database. In this 
case, the total number of 
records resulting was about 30, 
but that was whittled down to 
12 using the <CTRL-X> com- 


Ca Mel, 490-471111 PC/L; printers-tech, supp. Rob Papper? 
i OTel. (H9)-471111 (PC/L; printers-tach, supp. Rob Papper) 


mand; some of the people in 
the 30 might not have wanted 
their addresses printed here 
(the editor for instance!). You 
Xclude by displaying therecord 
that is not wanted in the Group 
or Xcludecommands—all you 
have to do to get all records 
back is key <CTRL-K> to Kill 
the Group. 

Youarenow ready to print, as 
far asthe programis concerned, 
but the problem with printing 
this way is the format of the 
text on the page. FlashBack it- 
self (without the Report Gen- 
erator functions) does not per- 
mit you to send instructions to 
the printer for formatting, so 
what comes out ona dot-matrix 
printer is usually 10-pitch (Pica) 
print, running from one edge 
of the paper to the other. This is 
easily altered by sending the 
appropriate commands to the 
printer from the SuperBasic 
command line first. Press ESC 
(then CTRL-C if necessary) to 
get out of FB and into SB, then 
type and ENTER a line such as 
the following one: 

OPEN#7,SER1:PRINT#7,CHR$ 


Adean Servi 


el. (952)-225895 (GL; Dennis Briggs) 


(27)&CHR$(108)&CHR$(10)& 
CHR$(27)&CHRS(77):CLOSE#7 


This sets the left margin to 10 
characters, and the typestyle to 
12-pitch Elite. Note that you 
may have touse different codes 
if your printer is not “Epson- 
compatible”. You can then go 
back to FlashBack and print 
from there, using the new 
printer settings. 

Thesecond illustration shows 
the printout of the Group, 
without any further manipu- 
lation. There are a couple of 
points to note on the printout. 
The first field (and the second 
in one case) is printed starting 
one character to the right of the 
start of the line; this is very 
likely not sufficiently annoy- 
ing to be worth trying to deal 
with. Thereare three blanklines 
between each pair of records. 
This point may be of enough 
importance to cause the user to 
try the “transfer method” of 
printing, via another program, 
as detailed below. 

To transfer the file to text”, or 
any other WP/editor program, 
use <CTRL-P> again but 
change the device to whatever 
you wish to use for temporary 
storage; RAM disk is the fast- 
est. You have to add the file 
namealso; for example, instead 
of SER1, set the device to 
RAM PRINT. All the com- 
ments about Grouping apply 
as before. After the Grouped 
database has been printed to 
RAM disk, you can Import this 
file into T87 using the com- 
mand <F3 F I A n>, that is, 
Importitas an ASCII file, in the 
“normal” (line-by-line) fash- 
ion. Illustration three shows the 
file as it looks after Importing 


38 Gilpin Road, Aideas ton, Telford, anya e TFS 66. 


Akhter Group pic, + ae Parry Road, Harlov, Essex (M18 7PH. 


jel. (8279)-443521 


Aladdink a QL, Freepost, ryanoutn 1019 Jem (9 MUTKEr LIRSCeNT, CYRROUTT, 
ideshire TDI SF). 
el, (QQ907)-5B965 (QL; ribbon re-inking, N.E.Coduin) 


Text: newi_@ocament, eres: Le} 


frase. text aa 
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Adder Publishing Ltd., P.G. Box 148, 
(0223)-277050 (QL) 


Tel. 


Adman Services, 
Tel. 


Akhter Group pic, 
Tel. 


53 Gilpin Road, 


Akhter House, 
(0279) -443521 <(Qt) 


Admaston, 


(0952) -25589S (QL; Dennis Briggs) 


Perry Road, 


Telford, 


Harlow, 


Cambridge CB1 2E&@. 


Shropshire TFS OBG. 


Essex CM1i8 7PN. 


Aladdink, Dept. QL, Freepost, Eyemouth TD14 SBR (4 Hurker Crescent, Eyemouth, 


Berwickshire TD14 SAP). 
(08907)-S0965 (QLs; ribbon re-inking, 


Tel. 


Alexander, 
Tel. 


John, 


Ark Distribution, 
Tel. 


Ashcroft, T, 


Fieldhouse Drive, 
(QL) 


Corve Farm House, 
(0983)-79496 (QL3 Archivist etc) 


Mitchell Avenue, 


Telford, 


Corve Lane, 


(QL; scientific references database) 


Aholasoft, Kirjurintie 3, 
? (QL; Jussi Koskinen, 


Tel. 


Armin Breuer vA. 
Tel. 
Stephen Michels) 


GBR, 


Atkinson, Joe, 
Tel. ? (Qt; ROMs, mdvs) 


Astracom 
Tel. (0480)-412884 (QL; 


ABS Computer Supplies, 
Tel. 


into T87. Bear in mind that the 
rightmargin set in T87 may not 
match that used in FB and you 
may have to adjust it to get the 
display right. The three blank 
lines are still there between 
records, and you may choose 
to remove some or all of them; 
you can also do any other edit- 
ing of the records that may be 
necessary, such as pulling the 
first lines back to the left mar- 
gin. 

Transferring a database this 
way has the merit of disposing 
of FB’s own formatting codes. 
You don’t need to get rid of 
unwanted material at start and 
finish of the file, once it has 
been Imported into T87. In 
terms of time and convenience, 
there is little to choose between 
the transfer method just out- 
lined, and direct Import of the 
_DBA file into T87, as described 
below. 

It is desirable to set both the 
typestyle and the margins you 
wish to use before reading any 
file into T87. Use the same 
command as when reading-in 


346 Ranelagh Road, 


SF-05400 Jokela, 


Postfach 2234, D-6104 Seeheim—Jugenheim 2, 
(01049) -6257-7244 (QL/Thor:Armin Breuer, Dirk Schafer, Andreas Brev, 


modem) 


4 Shouldham Street, 


(071)-224-8320 (QL; discs, ribbons etc) 


the Printed file: <F3FIAn>.A 
point to remember about T87 is 
that the set allocated memory 
(using the <F3 C PM nn> com- 
mand) may have to be consid- 
erably greater than the size of 
files to be Imported. The data- 
base used here occupied about 
50KB on disk but required a 
memory setting of over 150KB 
in T87. Even though you may 
have grouped the file in FB, 
you will get the whole of the 
database when Importing the 
_DBA fileinto T87. This may be 
acceptable, but it can mean a 
lot of manipulation if you only 
want a handful of records out 
of hundreds. You may have to 
use the Search and Block Copy 
functions several times to get 
the records you need all to- 
gether. 

When you read a _DBA file 
directly into T87, you need to 
delete a block of information at 
the start of the file which is for 
T87’s own use and of no inter- 
est when printing. Move down 
the file until you find where the 
first record of your database is, 
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N.E.Godwin) 


Finland. 
Sam The Little Spaceman) 


Shropshire TF2 


Chale Green, Isle Of Wight. 


Newcastle-upon-—Tyne NE2 


Germany. 


Ealing, London WS SRJ. 


London WiH SFG. 


then go back to the top and use 
the Block Delete command to 


get rid of everything prior to 
that line. Do the same thing at 
the end of the file, to remove 
unwanted material from there 
also. Record fields should be 
onseparate lines, withno blank 
lines between fields or records, 
provided you selected the 
“Normal” option when Im- 
porting the file. You are then 
ready to print, or you may want 
to edit out the odd spaces on 
the first lines of records, select 
particular records, etc. 

There is another way of han- 
dling printout. You can make 
use of FB’s ability to “drop” 
records or fields into underly- 
ing programs, and transfer 
records that way, oneata time. 
The fourth illustration shows 
one record transferred to T87 
this way, with the FB window 
at the bottom of the screen 
ready for the next transfer. 
Where name-and-address 
records are concerned, it may 
be desirable to reduce the space 
taken by the printout. One way 
of compressing the output is to 
use condensed (17 characters 
per inch) print. This can besent 
from theSBcommand line, and 
you could dotwoseparateruns 
direct from FB, winding the 
paper back between them and 
resetting the left margin so that 
you get two columns. Alterna- 
tively, once the records have 
been transferred to T87, you 
can use the Columns function 
there, together with condensed 
print. Don’t be afraid to experi- 
ment, but use a spare copy of 
your treasured database file . . . 


(ter Pblishing Ltd., Puls Qew $48, Combi (BL ZED, OTe, (23)-277088 
Der Publishing Ltda, Pi, Box 148, Cambridge C81 29, 
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Ref No GRRL © — BRI? 
Printer Connected 1/1 
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MASTERCARD FY 


SYSTEMS 


Microdrive users - read this ... 


NEW TRUMP 
CARD 


£225 inc. (£198 export) 
RAM + Disk interface + firmware 


We have re-engineered the TRUMP CARD 768K to use the new 

1 Megabit DRAM memory chips. This new design runs about 20% 

faster (twice the speed of the QL's internal RAM) and uses less 

power than the previous one (still available in the 256K size). It 
holds the same firmware: 

* TOOLKIT II which comprises more than 100 additions and 
enhancements to the QL's Superbasic and operating system 
including an on-screen alarm clock, wild card copying, 
accessing remote devices on other QLs equipped with a ROM- 
based TOOLKIT II via the network. 


* _ aprinter buffer which can be used to buffer the serial ports (the 
size of which is limited only by the amount of free memory) 
letting you get on with something else whilst the printer is 
printing. 

* ascreen dump facility to copy all or part of the screen image to 
most types of dot-matrix printer including some colour ones. 


+ aRAMdiskthatallows you to access the memory as you would 
Microdrives or floppy disks for fast file retrieval (please note that 
RAM disk contents are lost after switch-off or reset). 


* amemory cut that resets the QL to appear as an unexpanded 
128K type for the few early programs that refuse to run in 
expanded memory. 

The disk interface can access up to 4 disk drives (e.g. our DUAL 
3.5" plus our 5.25") and has the same commands as are used for 
Microdrive control. There is an additional command FLP_USE 
which can be used to divert all MDV accesses to FLP (the floppy 
disk interface device name). This makes the transferring of your 
software from unprotected Microdrive (i.e. the majority of QL 
software including Quill, Abacus, Archive and Easel) to disk atrivial 
task. A simple step-by-step guide for transferring Quill as an 
example is given in the comprehensive TRUMP CARD USER 
MANUAL supplied with the TRUMP CARD. 

The TRUMP CARD 768K's RAM adds to the QL’s own 128K 
giving a total of 896K. Like the firmware the extra RAM is installed 
automatically when the QL is switched on so that no installation 
procedure is necessary. The exception to this is TOOLKIT II which 
can be left uninstalled for compatibility if you have other toolkits; 
installation consists of simply entering the command TK2_EXT. 

Fitting the TRUMP CARD 768K is easy - you remove the door 
at the left hand end of the QL and slide the TRUMP CARD into the 
expansion port. A “Beginners Guide” on pages 3 and 4 of the 
TRUMP CARD USER MANUAL will quickly get the novice and 
experienced user up and running. 


TRUMP CARD 
768K PACKAGE 


£375 inc. (£333 export) 


TRUMP CARD 768K + dual disk drive 
+10 diskettes 


This is the ideal upgrade path from obsolete Microdrives. 
The package comprises the latest TRUMP CARD 768K 
plus a QL standard floppy disk drive with 2 mechanisms 
plus ten 3.5" double-sided double-density diskettes. The 
only extra item required is the appropriate mains plug to suit 
the country where it is to be used. 

Disks are more reliable than Microdrives, hold much more 
information (720K after formatting) and are several times 
faster. Besides these advantages they actually cost less. 
Our QL DUAL DISK DRIVE is fully boxed in a black metal 
casing and is mains (220V-240V AC) powered. 

An EXPANDERAM 512K can be used as part payment 
against the TRUMP CARD 768K PACKAGE. Just send it to 
us together with £285 (£255 for overseas customers) 
remittance and we will send you the TRUMP CARD 768K 
PACKAGE. 

This package transforms the unexpanded QL into a very 
powerful machine and is very easy to fit. We are confident 
that you will find this investment more than worthwhile as 
many QL users have already done so. If you are not fully 
satisfied with your purchase then by returning it to us within 
14 days of receiving it we will return your money in full. 


When ordering by phone it is sometimes easier to spell 
names and addresses using the phonetic alphabet 


A- Alpha H - Hotel O - Oscar V - Victor 

B - Bravo | - India P - Papa W - Whiskey 
C - Charlie J - Juliet Q - Quebec X - X-Ray 

D - Delta K - Kilo R - Romeo Y - Yankee 
E - Echo L-Lima S - Sierra Z - Zulu 

F - Foxtrot M - Mike T - Tango 0 - Zero 

G - Golf N-November  U - Uniform 


MIRACLE SYSTEMS Ltd 
25 Broughton Way, 
Osbaldwick, York, YO1 3BG, 
U 


Tel: (0904) 423986 
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Miracle Systems are exhibiting at the following: 


ALL FORMATS ALTERNATIVE NOTTINGHAM 
COMPUTER FAIR MICRO SHOW QUANTA MEETING 


New Horticultural Hall, Bingley Hall, Sherwood Community Centre, 
Elverton St., Victoria, Stafford Showground, Mansfield Road (A60), 
LONDON SW1 STAFFORD NOTTINGHAM 
10th November 1990 (non-members very welcome) 
ral Ldeadecltath ot 2: 24th & 25th November 1990 


14 day money back guarantee on all products 
142 month warranty on all products 
UK prices include VAT and P&P 
(Export prices in brackets include P&P) 


QL HARD DISK 
£449 (£405) 


40 MBytes of on-line storage 

About 5 times faster than floppy 

Fully cased complete unit 

Hard sub-directories 

Head auto-park 

Plugs into QL ROM port 

Through connector for ROM cartridge 
Fully compatible with TRUMP CARD 


We recommend that you consider purchasing the 
QL HARD DISK only if you have already 
upgraded to floppy disks (e.g. TRUMP CARD 
PACKAGE) so that backing up is practical. Also 
the QL HARD DISK uses about 55K of RAM 
leaving little room in an unexpanded QL for 
programs. 


QL 5.25" DISK DRIVE 
£125 (£114) 


vx 360K capacity 
vx Ideal for Conqueror 
Yx Through-con for dual 3.5" 


This complete unit can be retrofitted toa TRUMP 
CARD PACKAGE so that Solution/Conqueror 
users can read PC diskettes. We recommend that 
Microdrive users upgrading to disks consider the 
QL-standard TRUMP CARD PACKAGE rather 
than the 5.25" drive. 


(Needs disk interface e.g. TRUMP CARD) 


Tel: (0904) 423986 


To place an order by phone please 
have your credit card ready. For 
overseas customers we charge the 
prices shown in brackets. 


To order by post, please fill in the 
form opposite or write to us quoting 


QL DISK ADAPTOR - £15 (£15) 


tx Access 4 drives from TRUMP CARD 
tx Upgrade to latest TRUMP CARD ROM 


Plug this into the original TRUMP CARD, install 
the latest ROM (included) and your TRUMP 
CARD can control up to 4 drives, e.g. our Double 
3.5" plus 5.25”. 


QL CENTRONICS - £29 (£28) 

% SER1/SER2 to parallel printer 

zx Standard Centronics plug 

xx Default QL set-up 9600 baud 

% 3 metre cable 
Connecting a printer to the QL using this interface 
is not only simpler but is usually cheaper than 
buying a serial card for your printer plus a serial 
cable. Two interfaces will enable 2 printers to be 
driven simultaneously. 


QL DISK CARD - £100 (£89) 


tx TRUMP CARD without RAM 
tx Full TOOLKIT Il, etc. 
% Controls up to 4 drives 


The DISK CARD is intended for use with an 


internally expanded QL or with the EXPANDERAM. 


QL DISK CARD PACKAGE 
£250 (£224) 
DISK CARD Plus: 


tx DUAL 3.5", 720K DISK DRIVE 
% 10 diskettes 


QL EXPANDERAM 512K 
£99 (£88) 
tx Increases QL RAM to 640K 


tx Through connector for disk interface 
tx Plugs into the expansion port 


If you already have a disk interface then the 
EXPANDERAM will slot in between the QL and the 
interface. Programs running in the EXPANDERAM run 
about 1.75 times faster than those in internal memory. 


% Fully cased complete unit 


QL DUAL 3.5" DISK DRIVE 
£175 (£155) 
te 2x 720K disk drives yi 
Very aut operation = 

(Needs disk interface e.g. TRUMP CARD) 


QL TRUMP CARD 256K 
£135 (£120) 


% Increases OL RAM to 384K 

tx Controls up to two drives 

Toolkit Il, etc. 

wx Can be expanded to 512K or 768K 


Please note that we offer neither the parts nor the 
service for expansion. 


QL TRUMP CARD 256K 
PACKAGE - £285 (£255) 
TRUMP CARD 256K plus - 
Dual 3.5", 720K disk drive 
t 10 diskettes 


ae a 
To: MIRACLE SYSTEMS Ltd, 25 Broughton Way, Osbaldwick, 


Please send me 


York, YO1 3BG, U.K. Tel: (0904) 423986 


| enclose a cheque to the value of: £ 


expires iy CV] [| 


Name 


Or debit credit card BRAD HRERE SHR AR Se 


Signature 


Address 


your credit card number and expiry 
date, or enclosing a cheque payable 
to MIRACLE SYSTEMS Ltd 
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TOOLKIT 


his article explains how you can 

accelerate QL and Thor disk ac- 

cess, and check the contents of 

any drive quickly and comprehen- 

sively. CHECK_DISK_BAS suits almost 

all QL floppy disk systems, while 

FAST_COMPARE_BAS works with 

microdrives, ram disks, floppies or even 
hard disk sub-directories. 

The key to speeding up disk access lies 
in anticipating the hardware and asking 
for the right thing at the right time. 
FAST_FORMAT_BAS re-programs the 
Qdos disk allocation scheme, giving faster 
access without sacrificing compatibility. 
The new fast format disks are 


interchangable with old format disks, but 
load and save large files much more 
quickly. 

These programs are written in Basic, as 
direct access to QL disks is done the 
same way from SuperBasic as from as- 


sembler. There’s little point in writing 
machine code when compilers can do it 
for you; a well-designed program will 
probably spend most of its time waiting for 
the drive. 

QL World has printed many articles 
about disk expansion, but these have 
tended to aim at hardware, discussing 
interfaces, cables and drives. | shall focus 
on software. The QL harbours some neat 
design ideas; it’s amazing what you can 
do if you know how. 


Bootstrapping 

This article is primarily written for those 
who have a disk system up and running, 
and want to get the best from it. It helps to 
define some mechanical terms first. The 
data on any QL disk is held in concentric 
rings, or ‘tracks’, on either or both sides of 
the disk; the number of tracks on each 
side is usually 40 or 80. 

Every track holds nine ‘sectors’, each of 
512 bytes, giving a top capacity of 80 
tracks = 2 sides = 9 sectors = 512 bytes = 
737280 bytes, or 720K. 

Other information is recorded on the 


disk when you format it, in-between the 


sectors, so the system can compensate 
for small variations in rotational speed 
and identify any track or sector as itpasses 
the sensing head. The extra data explains 
why a 720K QL drive is said to have an 
‘unformatted’ capacity of one megabyte. 

The QL scheme may seem wasteful, but 


it has compensations. Commodore's 
AmigaDOS (developed by Metacomco in 
Bristol) dispenses with most of the sector 
gaps, allowing 880K in lumps of 5.5K, one 
lump per track on each side of the disk. 
The Amiga can fit 160K extra on a disk, 
but programs have to read a full track, 
even if they only want a few bytes. 

The larger the lumps, the more disk 
space can be used by files, and the faster 
large files can be accessed, but the smaller 
the lumps, the more files you can getona 
disk; lumps are rarely shared, as that 
would make individual files hard to find or 
extend. 

As a file grows, previously unused sec- 
tors must be allocated to it, and the usage 
of each group of sectors must be re- 
corded. On QL disks, allocation is in groups 


uses three sectors (1.5K). 

Files of more than 1472 bytes use six or 
more sectors; 64 bytes at the start of each 
file are used for a dummy directory prefix. 
64+1472=1536, the allocation size in 
bytes. 

This ‘granularity’ reduces the number of 
groups on the disk, and hence cuts the 
processing overhead involved in reserv- 
ing or discarding storage. A 1440 sector 
disk can hold no more than 480 files 
(1440/3 is 480). 

The practical limit is a little lower: when 
you format a disk to 1440 sectors, up to 
1434 are available for files. The other six 
are used by the map and directory. 

The first ‘missing’ group holds the disk 
map with the disk name and format de- 
tails, plus three bytes for each of 480 
groups, recording the file number and 
position for each. 


Simon Goodwin gives 
QL and Thor drives the 
DIY treatment. 


The other group is file zero — the di- 
rectory, containing a 64 byte Qdos file 
header for every file on the disk, including 
itself. This file occupies one group for 
every 24 files on the disk. File headers are 
discussed in QL World — February 1988, 
and Volume F of DIY Toolkit. 

Most computers cannot use a drive until 
the user notes its details in a ‘system file’, 
like CONFIG.SYS on MSDOS. This is 
often obscure and inconvenient. The QL 
is a better judge of adisk than many users, 
so Qdos works out the number of tracks 
and sides on a disk or drive automatically. 

When you present a new disk the sys- 
tem interrogates the drive to find out its 
capacity and the rate it can ‘step’ from one 
track to another. This explains the rattle 
and buzz you hear as the disk starts up. 
This system of trial and error is one of the 
QL’s finest features; it's fast, flexible and 
gets the best out of the machine and your 
drives. 

The data format on a QL disk was stand- 
ardised by Sinclair, but the codes and 
commands were not. More than a dozen 
QL disk systems have been marketed 
since 1984; most of these use variants of 
Tony Tebby’s QFLP system rom, but 
Quest, Dattel, MCS and Sinclair Re- 
search opted for alternatives. 

My programs assume you have a QFLP 

rom, or compatible system, though 
FAST_COMPARE_BAS will work on any 
machine with the toolkit command 
WSTAT. FAST_FORMAT and 
CHECK_DISK need the QFLP extension 
that allows you to read and write sectors 
as 512 byte strings; you're OK if your 
machine accepts: ~ 
OPEN_IN #3, “FLP1_*D2D” 
This command gives channel #3 exclu- 
sive control over sectors of drive FLP1. 
The OPEN_IN stops old, incompatible 
systems creating afile called “FLP1_*D2D” 
but it does not stop you writing sectors or 
allow access to other tasks. 

Channel #3 can then read and write any 
sector, given only the sector number (1- 
9), track (0-79) and side (0 or 1). The 
mechanism to send this disk address is 
rather eccentric; you multiply and add the 
component values, and use the compos- 
ite thus found to set the file pointer. 


SET_POSITION #3, SECTOR + (TRACK 
* 256 + SIDE) * 256 


SET_POSITION is a Turbo Toolkit com- 
mand; Toolkit 2users can substitute GET 
and PUT, prefixing the pointer value with 
a backslash (\), located above the Enter 
key ona QL. 

At a pinch you could use PAN and 
SCROLL, but it would take 160 succes- 
sive integer offsets to get from track 0 to 
track 79, and that seems gratuitous. 

Some QL disk systems have inadequate 
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documentation, so there’s extra informa- 
tion on the DIY Toolkit disk, including 
standard directory and sector map de- 
tails. Quanta members with an interest in 
other disk systems can obtain source and 
compiled code for my TRS-80 MultiDOS 
reader, from the group library. 

These programs suit controllers from 
Miracle Systems, PCML, Computermate, 
Cumana, Silicon Express, Technology 
Research, Sandy, CST and Thor Interna- 
tional. Suitable upgrades to the QFLP 
standard are available for Medic systems, 
and Sinclair's own model, produced by 
MicroPeripherals. Call Care Electronics 
for upgrade details. 

Old MicroPeripherals roms call the disk 
device FDK, andinclude DGET and DPUT 
commands, which read and write indi- 
vidual sectors, rather than the QFLP 
equivalents. The French Dattel disk sys- 
tem opts for FLD1 and FLD2, has its own 
direct sector commands RS and WS, eas- 
ily adapted. 

The expansion unit from Micro Control 
Systems was designed and programmed 
by Mark Snape; early versions included 
many good ideas, but fell short of the 
QFLP standard. Users tell me it has been 
fully compatible for the last couple of years, 
once the MCS Toolkit rom is fitted. 

As far as | know, the only QL DOS that 
refuses to read sectors directly was the 
firstto arrive. Quest's oddball interface was 
launched, amid a deluge of green plastic 
leaping frogs, in 1984. This system keeps 
its operating code on microdrive cartridge, 
rather than rom, and gets confused by 
files longer than 32K. 

| am keen to hear from anyone using 
disk systems | have not mentioned, like 
the QLinterfaces advertised by Kempston 
Micro Electronics. 

Like all popular eproms, QFLP software 
comes in many versions. In general high 
version numbers are best, but later 
changes are often intended to compen- 
sate for the quirks of particular drives. It 
may not be worth seeking an upgrade if 
your drives are already reliable. 

Version 1.07 was the first to support 
direct sector access, and appeared in the 
original CST Qdisk interface. 1.08 and 1.09 
fixed problems with LBYTES from 
microdrive and access to partly-corrupted 
disks. Version 1.10 was the first able to 
read and write old ‘single density’ disks, 
on interfaces with an appropriate control 
chip. 

Version 1.11 was functionally identical 
to 1.10, but the code in the rom was re- 
organised. Version 1.12 featured 
much-improved detection of the drive’s 
optimum stepping rate. QFLP 1.13 incor- 
porated tweaks to suit a batch of Mitsubishi 
drives, encased by many suppliers, which 
provide unusually short ‘index’ pulses. 

Version 1.14 is a major upgrade. It adds 
commands to control speed and security, 
and set up obscure track counts. See the 
details of FLP_OPT or FLP_TRACK and 
FLP_SEC in your disk manual, or on the 
DIY disk. The FORMAT command was 
re-written and error checking improved. 
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Troubleshooter recently doubted that 
anyone might format to 360K in a 720K 
drive, but | find it useful. If you give QFLP 
a disk name that has an asterisk as an 
eleventh character, the disk is formatted 
on one side, giving half the capacity in 
about 60% of the time: 


FORMAT “FLP1_SingleSide*” 


This can format a disk for a few files 
quickly, or for a single-sided drive. 

QFLP 1.14 fixed a silly bug in FORMAT, 
which occasionally produced a single- 
sided format by chance. The correction 
stops QFLP looking for the asterisk un- 
less an eleven character name is supplied. 

The toolkit commands WTV and WMON 
have similar bugs; they read their param- 
eters from memory, even if they are not 
supplied; this causes inconsistent results 
which depend on the values lying around 
in memory. 

QFLP V1.14 fixed a serious bug that 
could destroy the disk directory if you 
accidentally tried to load a null file (zero 
bytes) with LBYTES or EXEC. V1.15 of 
QFLP was adapted for the 1772 interface 
chip, which replaced the obsolescent 1770. 
Error-checking is slightly refined, and an 
extra 6K of small files can be stored. 
Earlier software would not save small files 
once 714K was full, because of a bug in 
the track zero handling. 

QFLP 1.16 avoids confusion if you swap 
disks with files open, or add toolkit com- 
mands with a program loaded. 1.17 is the 
same, apart from the added ramdisk, and 
1.18 is more tolerant of dodgy drives. 
V1.18 to 1.21 are identical, apart from the 
supplier. | hear that 1.22 to 1.27 have 
small changes to suit Minerva. 

Miracle Systems now supply V1.28 with 
their redesigned Trump Card; this can 
control up to four floppies. It also incorpo- 
rates code to control WIN1, Miracle’s hard 
disk drive, which used to load control 
software from a floppy. 


CHECKDISK 
PC users have a command CHKDISK 
which searches a disk for faults. Listing 1 


is CHECKDISK_BAS for the QL. The pro- 
gram attempts to read every sector, and 
reports unreadable tracks and sides by 
number. 

lf CHECKDISK reveals a problem, copy 
the files onto a fresh disk and start again. 
Some files may be unreadable because of 
bad tracks or sectors, but you should be 
able to retrieve most. Special recovery 
programs may be needed if directory track 
zero is damaged. 

FORMAT tests the whole disk surface, 
and locks out parts that do not hold the 
format pattern. Data can be corrupted 
later, by software errors, mechanical wear, 
magnetic or electric fields, running over 
the disk with your chair, or turning drives 
on and off with disks inside. 

CHECKDISK can re-assure you that 
your data is still readable, or help to nip 
problems in the bud — before your backup 
copy suffers the same fate! It's a good 
idea to run CHECKDISK before making 
important backups, or after any event that 
seems hazardous, in retrospect. 

QFLP does not re-read, or ‘verify’, the 
sectors it writes; that would make it slow. 
The only way to be sure a file has been 
saved correctly is to re-load it. The MCS 
interface has VER_ON and VER_OFF 
keywords to control write verification. 

CHECKDISK uses WHEN ERROR to 
trap and report disk errors without stop- 
ping the program; so | regret that it does 
not work on “AH” and “JM” roms. WHEN 
ERROR can easily crash Qdos if you 
forget to turn it off and make changes or 
load another program. 

Another bug means the interpreter may 
lose its place in the program and lock up 
if a trapped error occurs in an expression. 
CHECKDISK avoids error-prone expres- 
sions, soitshould notcrash your machine. 

The program listed checks 80 tracks 
and both sides of the disk. Adjust lines 250 
and 280 if you are not using a 1440 sector 
format. For a 40 track single sided drive, 
substitute: 


250 FOR true_track=0 to 39 


280 FOR side=0 


A bug in the current Thor rom, Argos 
6.4.1, means that GET will not read sec- 
tors into strings that have been 
dimensioned, so this example uses FILL$ 
to pack a string to the required size. 
FORMAT records sectors on the disk in 
ascending order, numbered from 1 to 9, 
but CHECKDISK reads sectors in scram- 
bled order to speed up access. As it takes 
time for SuperBasic to process each sec- 
tor once it has been read from the disk, the 


DEFine PROCedure FFORMAT 


faster at LBYTES, EXEC, SBYTES, 
SEXEC, Psion document SAVE, andeven 
PRINTing long lines from SuperBasic. 
The speed on task file-handling and COPY 
depends on the buffer size and number of 
contending tasks. 

At best, the time to save 500K on Thor 
XVI floppy falls from 1 minute 25 to 45 
seconds. A PRINT loop in QL SuperBasic 
accelerated from 5.3K per second to 8.3 
on a720kK disk, or 4.8 to 6.3K per second 


REMark VERSION 3.5 30/8/90 (C) 1989,90 Simon N Goodwin 
LOCal i, map2, map3,s1$,m1$, m2%, k$(2) 


CLS #0 


INPUT #0, "Put an EMPTY formatted disk in FLP1 & press ENTER: “;k$ 


REMark Read directory 
OPEN #3, “flp1_*d2d" 
GET #3\1,s13 


REMark Extract position of logical sectors 2 & 3 


map2=CODE(s1$( 42) )+1 
map3=CODE( s1$(43))+1 
GET #3\map2,m1$ : 


GET#3\map3, m2$ 


REMark Set offset used when stepping between tracks 


81%(39)=CHR$(0) 


: 91$(40)=CHR$(1) 


REMark Set up LOGICAL -> PHYSICAL translation 


FOR i=41 TO 49 : 
FOR i=50 TO 58 : 


s1$(i)=CHR$(i-41) : 
81$(i)=CHR$(78+i) 


REMark 0-8 
: REMark 128-136 


REMark Set up PHYSICAL -> LOGICAL translation 


FOR i=59 TO 76 : 
REMark Write new data 

PUT #3\1,s1%$ : PUT #3\2,m1$ : 
CLOSE #3 

CLS #0 

PRINT #0;"Fast format ready.” 
END DEFine FFORMAT 


software must wait for a complete lap of 
the disk before the next numbered sector 
comes round again. 

At best, a SuperBasic loop loading sec- 
tors in order from 1 to 9 can only read 2.5K 
per second, or one sector every 200ms. It 


may be slower still, after taking account of 
extra delays stepping between tracks and 
sides. 

CHECKDISK aims to read the whole 
disk and report bad tracks as quickly as 
possible, so it checks sectors in scram- 
bled sequence, reading every fourth sector 
till all nine sectors have been read. 

The interleaved sequence used was 
found by trial and error, and gives quick 
access on standard QL disks. It can check 
720K in two and a quarter minutes, while 
sequential reading would take six and a 
half minutes. 

FAST FORMAT disks work as normal 
on QL and Thor, but the speed of pro- 
grams and operations are different 
because the interleaving of sectors is 
changed. The QL is quite flexible; | have 
used various interleaves on my last four 
work disks for months without problems, 
using QFLP 1.16 and 6.4.1. 

|use FAST disks for tasks, screens, and 
other files that | wish to load in one step, 
but stick with the standard format for Quill 
documents, as they load faster that way 
and | like to refer to past articles as | write. 
If you find yourself pushed for time, | 
recommend you use a ‘quick format’ disk 
for incremental saving as you go along, 
and standard format for finished work. In 
the former case you SAVE more than you 
LOAD, and vice versa. 

FAST_FORMAT disks are often slower 
than the originals on interpreted file IN- 
PUT and Psion LOAD — but in my 
experience they can be 30 to 100 per cent 


s81$(i)=CHR$(i-59) 
PUT #3\3, m2 


: REMark 0-17 


on a single-sided disk. Screens load at 
over 16K per second, compared with 
12.5K per second normally. The Thor XVI 
reaches 18.8K per second, saving about 
three seconds when EXECing Xchange 
from floppy. 

If you read a file more than once the QL 
will often get the data from ‘slave blocks’ 
in spare memory, rather than the drive, so 
swap disks regularly if you want meaning- 
ful timings. It's a small advantage, but it’s 
free, and only takes a couple of seconds 
to convert a freshly formatted disk. 

Conversion of slow to fast format is 
possible, but you need to read each track 
into memory, re-order the sectors, and 
write them all back. It is quicker and safer 
to copy everything from one disk to an- 
other. 

Sometimes the computer knows from 
the start which sectors to save or load, 
and the memory area to be used — EXEC 
and LBYTES work like that, and Devpac, 
Spyand Chas Dillon's Editorload files this 
way; so do most Page Designers. 

In this case QDOS uses a ‘scatter load’ 
system, introduced for the ZX Microdrives. 
Slave Blocks are not used. As sectors 
come from the drive they are slotted di- 
rectly into the receiving memory; loading 
continues until all the slots are full. You 
can see this clearly if you save a screen 
on cartridge with 


SBYTES MDV1_SCREEN, 131072, 
32768 


then clear the display with MODE 4, and 
re-load with 


LBYTES MDV1_SCREEN, 131072 


Try the same thing with an empty disk, 


and notice the ‘shutter’ effect as individual 
sectors load. The sequence used by 
SBYTES does not match LBYTES ona 
normal interleave, so loading is uneven in 
speed and scrambled in sequence. 

Now take a freshly formatted disk in 
FLP1, and type FFORMAT with 
FAST_FORMAT_BAS loaded. Save and 
re-load the display on the modified disk. 
The image should reappear smoothly and 
consecutively down the screen, at notice- 
ably higher speed. If it pauses or hiccups 
part-way down, you need to set a new 
stepping offset. 

The first 64 bytes of any Qdos disk 
contain details of the format and inter- 
leave. The first four bytes of sector 1, track 
0, side 0 must contain the characters 
‘QL5A’, to identify the QL format. Then 
come ten bytes for the disk name, and a 
host of other details. 

The QL lets you configure the order in 
which sectors are used into any disk. 
FAST_FORMAT adjusts three entries — 
the stepping offset and the logical to 
physical and physical to logical transla- 
tion tables. The logical to physical table 
contains 18 entries — one for every sector 
on each side of a track. 

The values determine the order in which 
the software uses physical sectors. Nor- 
mally QDOS puts every thirdsector in the 
same group, so a single track contains 
three groups, comprising sectors (1, 4, 7) 
then (2, 5, 8) and (3, 6, 9). 

Groups on each side of the disk are 
usedalternately, if it's adouble-sided disk. 
The first three groups on track zero use 
sectors 1, 4 and 7 onside 0, followed by 1, 
4. and 7 on the other side of the disk, then 
2, 5 and 8 on side 0, and so on. 

This suits many sequential files, like 
Psion data files, and Basic programs that 
INPUT and PRINT to disk. The gap of two 
sectors gives the program about 40 ms to 
process the next 512 bytes of data, before 
the next sector comes round. If it takes as 
much as 50 ms, the sector header will be 
missed and you'll have to wait an extra 
190 ms for the next lap of the disk. 

In fact the order in which Qdos uses 
sectors is configurable for every disk, al- 
though few people use anything but the 
standard 1:3 interleave. 
FAST_FORMAT_BAS alters the inter- 
leave on a QDOS disk to 1:1. You could 
just as easily change it to 1:2, or 1:4, 
depending on the speed of your program 
— or keep different formats for different 
applications. All QFLP and Thor roms are 
compatible with this feature now, but this 
is the first time it has been explained. 

Normally the table indicates sectors 1, 
4, 7 and so on, as explained earlier. Just 
to add spice it numbers sectors from zero 
and adds 128 for the other side, so a 
typical table starts 0, 3,6, 128, 131 andso 
on. 
FAST_FORMAT re-programs the table 
to use sectors in strict ascending order 
from 1 to9 on side 0, then side 1 similarly. 

The Physical to Logical table is the 
same thing in reverse — 18 bytes indexed 
by SECTOR+SIDE’9 to give logical sec- 
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tor numbers between 0 and 17. 

The stepping offset compensates for 
the extra delay associated with stepping 
from one track to another, so QFLP uses 
sectors in staggered sequence from one 
track to the next. The idea is that the next 
sector should be ready under the head as 
soon as the disk has stepped from the last 
sector of the previous track. If the offset is 
3, sectors 4, 7 and 1 will form the first block 
on track 1. 

| use a stagger factor of one sector on 
fast QL disks, and zero on Thor ones, as 
this gives the best speed for LBYTES and 
SBYTES. You may find two or three is 
better, if you have a slow drive — as a 
rough guide, these usually rattle when 
others squeak. 

There is no ‘correct’ value, any more 
than there is a ‘correct’ interleave. The 
ideal stepping offset depends as much on 
your hardware as your software. If your 
drive steps slowly, replace CHR$(1) in 
line 230 with CHR$(2) or even CHR§(3). 
Fast systems may allow CHR$(0). 

FAST_COMPARE_BAS only uses one 
toolkit command — the ubiquitous and 
arcane WSTAT, which gives ‘Wildcard 
STATistics’ about files on a drive. The 
program quickly compares the files on two 
drives, by scanning their directory statis- 
tics. This means it can miss very small 
changes, like a few characters altered or 
transposed, but it picks up most signifi- 
cant errors. 

Like most users with hard-earned data 
on disk | keep multiple copies and aim to 
save each file to two or three disks after 
any major change. Problems usually be- 
come obvious when | notice that the 
number of free sectors, shown by DIR or 
STAT, differs between media when | ex- 
pect them all to hold the same thing. 

Normally this means | have failed to 
save afile on one of the disks, or forgotten 
to save an update, so that one file has 
been extended but the other has not, 
causing the discrepancy in drive statis- 
tics. Sometimes whole groups of files are 
missing or outdated. Mismatches may 
stem from known rom bugs — for instance 
both SAVE and COPY sometimes fail to 
report errors, leaving incomplete files. 

At such times | need a quick way to 
determine what's gone wrong. There may 
be 400 or more small files on one floppy 
disk, and scores or hundreds on a car- 
tridge. 

A full DIY Toolkit disk contains over 150 
files, ranging in size from a few bytes to 
26K. As the kit grew | needed an efficient 
way to keep my copies up to date and 
avoid losing tweaks and improvements 
dreamt up at the end of a hard day’s 
thinking — when it is easy to forget to 
update one of the backup disks. 

| could write a loop to read each sector 
from each disk, and compare them, but it 
takes ages to read andcompare 1,474,560 
bytes on two drives, and shows up lots of 
irrelevant differences which might be 
caused by deleted files on one drive, 
mismatched file name (so DIY19_DOC 
does not match Diy19_ DOC) or differ- 
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ences in the order of files in the directory. 
What's more, the drives are unavailable 
to other tasks while open for direct sector 
access. 

| wanted a method of comparing disks 
that works in a few seconds, ignores trivial 
differences, and tells me the disk, file 
name and expected size for all missing 
files — and the drive and size of each 
version, when files with equivalent names 
differ in size. | wanted itto work on any QL, 
with any drives. 

FAST_COMPARE_BAS fits the bill, as 
long as your system has three drives and 
the WSTAT command, or an equivalent 
which reports file-names and sizes on 
alternate lines. You can get by with two 
drives if you adapt the program to use 
pipes and QLINK from DIY Toolkit's Vol- 
ume P. Direct the report and temporary 
files to pipes, or MEM, instead of the 
TEMP$ drive. 

The program starts by reading the direc- 
tory statistics from drive 1 intoatemporary 
file. It copies the file names and sizes into 
arrays FNAM$ and FSIZE: the code uses 
INPUT to read each name, so itis confused 
if you use names with line-feed characters 
inside! If you plan to use the program on 
files which are open, beware of ‘in use’ 
reports, or foreign equivalents. 

The second lump of code reads through 
the statistics for drive 2, and tries to match 
each file against an entry in the arrays. If 


the name matches, but the size does not, 
the code reports: 


Mismatched size <NAME> <DRIVE1> 


<SIZE1> <DRIVE2> <SIZE2> 


Files that appear on one drive but not the 
other prompt: 


Excess file <NAME> <DRIVE> <SIZE> 
bytes 


Add wild-cards or sub-directory names to 
the device names in line 150 if you want to 
restrict the names of files checked. The 
result is a report on device TEMP$, in the 
file “COMPARISON” — you may wish to 
change the name. 

The programs and text of this article are 
available on 3.5 or 5.25 inch disk, together: 
with further details of QL disks. The price 
is £7 Sterling, calculated at three quid for 
the data and four for the service; everyone 
except the Post Office benefits if you 
order other volumes, from past columns, 
at the same time. For a full list, send an 
SAE to DIY Toolkit, Cwm Gwen Hall, 
Pencader, Dyfed, Cymru SA39 9HA. 

Suggestions are welcome as ever at the 
QL World address, but please allow a 
while for them to be forwarded; like other 
contributors, | do not work in the office. 


REMark QL/Thor FAST COMPARE 
REMark Copyright i990 Simon N Goodwin 


REMark Version 1.1 


LET di¢=*’ flp1_”’ 


LET max%®=480 : tabi=16 


3078790 
REMark Extensions needed - 


: a2s=’ fip2_’ 


WSTAT 


: temp =’ rami_’ 
tab2=53 


DIM fnams( max%, 36), fsize(max*®) 


GET_STAT dais 

countix%=O : 

REPeat readi 
IF EOF( #3) 
count1i%®=count1i#+1 
IF count1ixX%>max% 


PRINT #0; “Too many files on 
>“ maximum “ 


REMark Number of files in device 1 
: EXIT readi 


“;a1ls; 


;max% =: CLOSE #3: STOP 


INPUT #3, fnams(count1%®), fsize(count1%) 


END REPeat readi 
CLOSE #3 


GET_STAT a2 : 

OPEN_NEW #4,temps & 

REPeat read2 
IF EOF( #3) 
INPUT #3, files, size 
count2%=count2%+1 


: DELETE temps & 


count2%=0 
* Comparison’ 


“te “ 


EXIT read2 


IF NOT ONd1i(file’,size) THEN EXCESS da23 


END REPeat read2 
FOR i=1 TO count1% 
IF fsize(ir>=o 

files=fnams( i>): 
END IF 
END FOR i 
PRINT #4; \count1i%;”~ 
PRINT #4; count2%;" 
CLOSE #3 


size=fsize(i): 


files found on ” 
files found on ";a2s 
: DELETE temps & 


EXCESS dis 


;a1ls 


*temp’ CLOSE #4 


PRINT #0; "See the file” !temps; "COMPARISON” 


BEEP 3000,0 : STOP 


DEFine PROCedure EXCESS(drives) 


PRINT #4; "Excess file” 


TO tabi; files; 


PRINT #4;TO tab2;driveS!size!’ bytes’ 


END DEFine EXCESS 


LOCal i 
FOR i=1 TO count1% 
IF fnams(i>==ns 
IF fsizoe(i)d<>s 


END IF 
fsize(ir=-1 


o 
END DEFine ONdl 


PRINT #4; “Mismatched size” TO tabl;ins; 
PRINT #4;TO tab2;d18%!fsize(id!!!:d28!sa 


: REMark I@nore this later 
REMark Names match 


DEFine FuNction ONdi(ns,s) 


DEFine PROCedure GET_STAT(drives) 


OPEN_NEW #3,temp3 & 
WSTAT #3,drives 
OPEN_IN #3,temp3 & 
END DEFine GET_STAT 


*temp’” 


* temp’ 


REMark Rewind? 


Bryan Davies 
considers disks and 
spell checkers 


.G.H. Services report that the 4th 

issue of QL Technical Reviewwas 

being run off in mid-July and I'll 

report on it when a copy is re- 
ceived. 

The short article on Page 40 in Septem- 
ber QL World produced a very speedy 
response from John Roberts, who offers 
an alternative way of adding fields to Ar- 
chive databases, but only for users having 
a copy of The Editor. 

He suggests Exporting the database 
concerned, then reading it into The Editor 
and using the commands given below. 

Sample database, as it appears when 
read into The Editor: 


“firstfield”,“secondfield$”, “thirdfield$” 
0, “Seconds”, “Thirds” 

1, “Secondday”,“Thirdday” 
2, “Seconds”, “Thirds” 

3, “SecondMon, “ThirdTue” 
4, “Seconds”, “Thirds” 

5, “Seconds”, “Thirds” 

6, “Seconds”, “Thirds” 

7, “Seconds”, “Thirds” 

8, “Seconds”, “Thirds” 

9, “Seconds”, “Thirds” 


Commands (the > sign indicates ex- 
changes to be made at the ends of the 
lines and the lines in brackets are ex- 
planatory, not part of the command): 


t ec>>,“fourthfield”> 

(add another, numeric field) 

rp n ec>>,4> 

(add ‘4’ to new field, in each record) 
t ec>>, ‘fifthfield$”> 

(add another, alphanumeric field) 
rp nec >>, “nothing in particular’> 
(additional quotation marks for text) 


The final step is not clear from John’s 
letter, and | have not had time to check it; 
you have to “take out everything on the 
last line except ? and write the amended 
file’, the ? indicating something missing 
from the letter. Write out the new file with 
a __ LIS extension from The Editor, then 
Import it back into Archive. 

The commentin the “Response to Read- 
ers’ Letters” section about a program 
ordered from PDQL concerns HardBack , 
written by Chas Dillon for hard disk users. 
After waiting for well over a month for a 


copy, one arrived from PDQL the day after 
an associate complained about its non- 
arrival (it is his hard disk | am trying to set 
up). As the program implies, it deals with 
backing-up files from hard disk, and | hope 
to report on it at a later date. | had hoped 
the program would also provide more- 
general utility functions, to make the hard 
disk easier to use, but that is not the case. 
However, the instructions are helpful to 
anyone trying to understand the workings 
of the software provided with the Miracle 
hard disk. 

If you are looking for odd items of hard- 
ware, try Adman Services, which has a 
large variety of QL (and other) oddments. 
For example, they have MP disk inter- 
faces, with a choice of rom chips, and dual 
disk drives plus the MP interface, with box 
and power supply, for about £150. They 
can also provide an eprom board, to allow 
Qdos and other routines to be accessible. 
The phone number is 0952 255895 


Readers’ Letters 


Differences between printers account 
for a large proportion of the problems 
users have. Whatworks wellon one printer 
may initially seem useless on another. A 
couple of recent examples concern the 
program TechniQL and the optical scan- 
ner reviewed by Mike Lloyd a few issues 
ago. The saga of J. Roy Goodall’s diffi- 
culty printing from TechniQL continues, 
and it hard to see a way of bringing it toa 
happy conclusion, because he is so far 
away (Belize) from the supplier, T.K. 
Computerware. 

In view of the fact that the program has 
been around for almost as long as the QL, 
it can reasonably be assumed that print- 
out can normally be obtained from it, but 
Roy cannot get printout to either an Epson 
LX-800 or a Tandy DMP-130A. T.K. sup- 
plied another program copy, and the result 
was apparently the same, making it seem 
unlikely the fault lies with the program 
copy itself. The serial-parallel interface 
used with the printers has been replaced; 
hopefully, that eliminates it as a potential 
source of the problem. 

Printout from Easel and Eye-Q on the 
LX-800 “presented no problems”. The LX 
is not (so far as |am aware) a fully “Epson- 
compatible” printer, despite being 
manufactured by Epson. | have attempted 
to use an LX printer-driver with an Epson- 
compatible printer and got decidedly erratic 
results. Does anyone know of differences 
between Easel/Eye-Q and TechniQL, in 


the way they treat printers as being Epson- 
compatible? One other thought that comes 
to mind at present is the likelihood that 
Roy’s QL has a JSU rom (the type fitted to 
QLs sold in the USA); it is known that 
screen graphics can look quite different 
with the JSU, compared to the JS UK rom, 
and it may be that the output to the printer 
is similarly different. In addition, itis thought 
that some US-specifications differ from 
UK-spec ones. Perhaps US readers have 
some thoughts on printing from TechniQL? 

The scanner is a printer-dependent de- 
vice in so far as the software has to drive 
the print head. To be able to do this, the 
software has to be supplied with various 
movement codes specific to the printer 
being used. In the case of E. May, the 
printer is a Seikosha GP-100A Mark Il, 
and he has not succeeded in getting the 
print head to scan his documents. The 
head moves alittle, then stops. The printer 
details have been sent to the manufactur- 
ers of the scanner, and comment from 
them is awaited. In general, the scanner 
does a good job; Mike Lloyd was im- 
pressed with the one he reviewed, and | 
am informed that it can do a good job of 
displaying a £5 note in colour! 


Keyboard Products have refunded 
Richard Alexander’s money, having been 
unable to supply the ordered keyboard in 
time (but he says he may re-order). As 
reported last month, they stated they have 
completed the redesign which caused de- 
lay, and should be delivering PS/2 
keyboards in areasonable time now. As of 
late August, there has been no further 
comment from Michael Jackson regard- 
ing his order for this keyboard, but there 
have been no other complaints. 

R.W.S. Dand says he contacted his 
credit card company about the double 
charge for goods supplied by PDQL and 
the second debit has been refunded, but 
the credit card company said they had not 
been repaid by PDQL. J.S. Hay now has 
a working Rename routine, supplied to 
him by Brian Hedge. Comparison of their 
typed-in lines revealed an error in one 
data value. There was more to it than this, 
however, as Hedge had written a 3-line 
routine to get around the problem many 
earlier QLs had with the CALL command 
not working properly, and this was neces- 
sary to enable the Rename routine to run 
on Hay’s QL. E.E. Stocker has received a 
refund and disk from Sector Software, 
following a mix-up about orders he placed 
with them. J. Roberts has contacted Psion 
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about corruption on his Psion Chess car- 
tridge, and they have offered to help. 
Although Psion do not now bother with the 
QL market, they have been helpful in 
dealing with queries on various occasions, 
and they don’t seem to have “washed their 
hands” of the QL. 

A problem of a different nature, to which 
| know no answer, was put by C.G.H. 
Services. In response to my repeated 
advice to pay for goods by credit card, they 
state that small businesses are not con- 
sidered suitable to be given a credit card 
“franchise”, so that | am effectively advis- 
ing readers not to buy from small 
businesses. My understanding is that card 
companies do not refuse facilities to small 
businesses but, understandably, they may 
refuse in cases where they feel a business 
is not sufficiently long-established or can- 
not provide suitable references. | did not 
mean that buyers should make use of a 
credit card a hard and fast rule (especially 
now card companies are starting to charge 
for the card, and its value has dropped 
correspondingly). If you spend, say, £5 to 
£20 as you might with several small sup- 
pliers most buyers can afford to take the 
chance of losing that amount, and pay by 
cheque or postal order, etc. Itis when you 
order expensive goods that the use of a 
credit card becomes highly desirable. It is 
for the individual to decide at what level 
loss of the money would be painful. Credit 
card companies may set a limit below 
which they do not give refunds, and that 
figure has typically been £100, although 
that does not seem to mean refunds of 
lower amounts will automatically be re- 
fused. 

It would certainly be untrue to imply that 
small companies are inherently less trust- 
worthy than large ones. In any event, all 
the suppliers we are familiar with on the 
QL scene are small, by normal business 
standards. Large adverts and familiar 
names are not guarantees that your order 
will be despatched but, if the new owners 
of QL World (the Maxwell group) ensure 
that advertisers pay promptly for their ad- 
verts, there will much less chance of 
adverts appearing in future from suppliers 
in the process of going out of business. 

The PC supplier which presented the 
most unbelievable face to me, resulting in 
my having to claim a refund from a credit 
card company, now provides a large ad- 
vertising spread inthe PC magazine | read 
regularly, and similar adverts in several 
others. 

One has to “test the water” at some point, 
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by sending money and hoping for some- 
thing in return. Preferably, one should 
have favourable comments from other 
buyers to give confidence. Naturally, those 
of us who write for QL World come into 
contact with suppliers,and form our own 
opinions of those who seem trustworthy; 
inevitably, we deal more often with the 
bigger suppliers, because they have more 
hardware/software to be reviewed, and 
because more readers write in aboutthem, 
since more readers buy from them. At this 
point in time, the main suppliers all seem 
both trustworthy and commercially sensi- 
ble. That is, they normally supply what is 
ordered, only cashing cheques when they 
feel certain the goods are available for 
despatch, and they keep their finances in 
sufficiently good order to be able to meet 
their commitments. Several suppliers have 
reported a downturn in orders over the 
past few months, and an increased level 
of “suspicion” on the part of buyers. That 
is, because of the way two suppliers 
treated their customers last year, and 
early this year, good suppliers are now 
suffering loss of business, and finding that 
buyers are tending more to want to collect 
goods personally rather than order them 
by mail. 

What can one say, in hindsight, about 
PDQL and SUB? As a supplier, PDQL did 
not always seem as “professional” as 
some others, but it never gave us the 
impression of being unsafe to deal with, 
not until about the time the letters of 
complaint started arriving atthe magazine. 
The situation is still quite unclear, as an 
associate of mine recently (late August) 
called PDQL to complain about ordered 
goods not being supplied, and was as- 
sured one particular program would be 
sent that day and it was duly received the 
next day. 

SUB didn’t seem “right” to me, from the 
start, but you can’t advise readers to steer 
clear of a supplier simply because your 
own intuition has doubts. The concept of 
an answer service for users with problems 
was laudable, but the chances of success 
with such an enterprise struck me as 
small. Eidersoft tried it earlier on, and 
came unstuck. Taking money on the 
promise of supplying help is a shaky 
premise, for the supplier as well as for the 
punter. As the supplier, if you subse- 
quently find that you don’t have the time or 
the expertise to provide the answers the 
subscribers need, you soon end up hav- 
ing spent the money they sent you, and 
with a mass of complaints and calls to 


deal with. Once you let correspondence 
build up to a significant level, you won't get 
any work done. A supplier that gets even 
one letter to deal with for every 50 to 100 
orders despatched may find it hard to 
keep order processing efficient, and to 
make money and this is also areason why 
it can be difficult to get replies to letters 
even from “good” suppliers. 

Insurance is a subject we all tend to fight 
shy of, sometimes to our cost. Recent 
correspondence concerning an expensive 
item returned to a supplier as defective, 
and received by the supplier ina damaged 
condition, highlights this aspect of mail 
order business. If the goods are expen- 
sive, insure them. Don’texpectthe supplier 
to have insurance cover for goods that 
might be returned to them! Make sure the 
insurance is for the full value of the goods, 
not for some nominal amount which may 
be far less. Itis also essential to advise the 
supplier of what you are doing, and to give 
the supplier first look at the goods which 
are thought to be defective. If you feel it is 
necessary to bring a third party into the 
matter, choose someone who is profes- 
sionally-qualified to give a full written report 
on the claimed defect, and who will submit 
a proper report that would be acceptable 
to a Court as “competent, independent 
professional opinion”. 

A supplier called to advise that we might 
get a complaint from a QL user who had 
ordered certain programs, changed his 
mind and cancelled the order on the basis 
of “expert opinion” on the programs con- 
cerned, and then changed his mind again 
and reinstated the original order. The sup- 
plier might not now be keen on dealing 
with the order at all, as the amount of time 
spent so far, and the distinct possibility of 
further queries, suggests the sale would 
hardly be a profitable one. A few words on 
the need this particular user apparently 
has might answer questions for others. 
The stated requirement was to be able to 
transfer text files between QL and PC, in 
both directions, maintaining typestyle en- 
hancements (eg italics, bold). The program 
to be used on the QL was text®’, and 
WordStar and/or WordPerfect seemed to 
be the other WP program to be used on 
the PC. 

The first point is that direct transfer of 
files, without any attendant “translation 
routine” being used, would enable text to 
be transferred with little difficulty, but en- 
hancements would be lost in the process. 
Whatever you put into the original file, the 
version of it received by the target pro- 
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gram would be devoid of the correct 
codes that tell the printer when to change 
size, print in bold, use an italic character 
set, etc. If the user accepts this limitation, 
and is prepared to reinsert printer codes 
using the target program, the transfer 
process is quite easily accomplished us- 
ing XOver, MS-QLink, or similar 
programs. 

The transfer process does not actually 
remove all non-text codes; if you want 
files transferred from the QL to be as 
“clean” as possible when they are passed 
to a PC, the obvious program to use is 
The Editor. It keeps its files in a simple 
Ascii-text format and doesn't insert lots 
of formatting codes for its own purposes. 
text” does use its own formatting codes; 
if youtransferastandard_T® filetoaPC 
you get rather a mess, which might take 
you avery avery long time to knock into 
acceptable shape. You should use the 
Export-Ascii command in text®” to make 
the file to be transferred as clean as 
possible before using XOver or MS- 
QLink — to transfer it. Using the Export 
command does not, however, get over 
all problems associated with print codes. 
As an example, the dash (hyphen) 
character used in text®’ is different from 
that used in WordPerfect 5.0; although 
the dashes remain in the transferred file, 
you can’t use the Search command in 
WordPerfect to find them, because it 
simply does not recognise the code used 


by text®’ (this is an oddity of WordPerfect, 
not a fault in text®’). 

When WordStar files are transferred 
from PC to QL, the last character of each 
word gets altered. 

You can deal with some of these prob- 
lems by writing a macro instruction or 
command file to make necessary con- 
versions once file transfer has been 
completed, but this is clearly only practi- 
cable when the target program is capable 
of recognizing the codes which need 
changing. For example, when a 
WordPerfect file is saved in Ascii form 
and transferred to the Editor, the only 
tidying-up work needed may be to 
remove end-of-line codes (displayed 
as “splodges” by The Editor), and 
The Editor is well-suited to doing this 
job with the minimum of activity on 
the user's part. Most WP programs 
(including text®’) are not designed to 
do the manipulations that The Editor 
is capable of and they don't recog- 
nise many of the codes that it can 
use. 

Where print codes in a text file are 
explicit — that is, you can see the 
codes on the screen display — and 
you can choose your own codes, you 
are ina position to select codes which 
the target program will recognise. 
Again, The Editor is the obvious pro- 
gram, because any typestyle 
enhancements you insert into Editor 
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files have to be identified by on-screen 
codes, which you can select to suit 
your purpose. Quill uses embedded 
codes for some typestyles (under- 
line, superscript, subscript and bold), 
so you will have trouble with these, 
but you can use the Translate entries 
(when creating the printer-driver) for 
other typestyles and choose codes to 
suit. 

Text®’ is the best QL WP program, 
from the point of view of handling 
many typestyles, but the codes are 
all embedded. My experience im- 
porting text®’ files into WordPerfect is 
that — whichever method is used — 
tabs and typestyle codes are lost and, 
with one method of importing, “real 
characters” (such as the degree sign 
°) may also be lost; the end result is 
satisfactory for my purposes, but 
there can be a fair amount of time 
involved in putting enhancements 
back in. Much the same applies with 
Quill. 

Complicated as it may sound, there 
is merit in using The Editor as the 
transfer agent, but using text®’ as your 
normal document-preparation pro- 
gram. Make the transfers (both ways) 
via The Editor, to keep the files clean 
and enable conversions to be made, 
but use text®’ to prepare text for 
printing. You can easily Import files 
from The Editor into text®’. 


DATA SYSTEMS 


A FAST AND EASY TO USE PCB DESIGN SYSTEM 
FOR THE QL AND THOR 


DESIGN FEATURES INCLUDE: 


. A32 by 32 inch drawing area. 
. Resolution down to .001 of an inch. 


. Up to 16 separate layers with variable colour assignments. 


. 16 predefined Pad shapes and sizes. 
. 64 Track widths from .005 to .32 of an inch. 


. The number of components on a layout is limited by memory only. 
. Auto repeat on all elements ~ ideal for memory planes. 


. Can be used for surface mounted devices. 
9. Auto via system for multilayer boards. 
10. Over 32000 user definable library components. 


11. Can output plot files to any valid QL/THOR device. 


12. Produces Dot matrix, HP-GL or laser files. 


13. Supports Trump card and ABC Electronik keyboard interface. 


Minimum system 
Payee 


nase 
IlUGES 


Ree ent QL/Thor Users Group 


Worldwide Membership is by subscription 
only, and offers the following benefits: 
Monthly Newsletter — up to 40 pages 
Massive Software Library — mostly FREE! 
Free Helpline and Workshops 
Regional Sub-Groups. One near you? 
Advice on Software & Hardware problems 
Discounts from most major suppliers 
Subscription just £14 for UK members 
Overseas subscription £17 


Barclaycard: Visa: Access: Mastercard 
* Now in our SEVENTH successful year * 


Further details from the Membership Secretary 


David Johnson 
The Corner House 
Loxley, Warwick 
CV35 9JT 
Tel (0789) 842543 


Please make cheques payable to Lear Data Systems and send to: 
6 SOUTH VIEW GREEN, BENTLEY, 
IPSWICH, SUFFOLK IP9 2DR. 

TELEPHONE: (0473) 310804 
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JOCHEN MERZ SOFTWARE 


Im stillen Winkel 12 - 4100 Duisburg 11 —- W-Germany 
Tel./Fax 0203/501274 


QL-Emulator for ATARI ST 


Emulator (Hardware, QJUMP's Drivers (including WIN). AtariDOS and more...) £169 
EPROM Cartridge for ST (makes machine autoBOOT) £30.50 
Floppy Adaptor to connect QL-Disk-drives to the ST £9.50 


QL-Hardware 


ABC-Keyboard Interface (for IBM PC/XT keyboards) £44 
High Quality Mouse for QIMI or ATARI ST £29 


Software 
QD Il - Editor 


Now with local directory and even more additional facilities! QD II uses Button Frame of QPAC II 
it also uses QTYP_SPELL for typechecking. Markers are also implemented. Easier and more clever 
menu handling. Short-selection keystrokes for frequently used commands. Real scroll bar with new 
Window Manager. Window may be split for different views of a file. Colour-configurable. With 
HOTKEY System II and Pointer Environment. New MenuExtension which gives standard menus 
(e.g. File Select), £38.50 
QMENU 
Many QD-Users will know it: the Menu Extension. Now with more facilities, even real subdirectories 
are treated in a new file-select window. Programming instructions and examples for SuperBASIC and 
machine code, £11.50 
DIAMONDS 
New Game. This is definitely a just one more go’ game to keep you up at night, a kind of action-puzzle 
£11.50 
QSHANG 
QL version of the well-known game. Very nice graphics, | or 2 player game and many other features. 
£16 
THE PAINTER 
An excellent graphics program for MODE 4 & 8. Uses Pointer Environment, so that it may be 
controlled by QIMI or SuperQBoard Mouse. Works fine with QL Emulator. £30 


x sinclair lg 


EEC LTD MAIN SUPPLIER OF 
Sinclair QL COMPUTERS & PRINTERS 
QLs FROM £125 PRINTERS FROM £120 


The expandable system for small businesses, beginners, and experts. 
QLs COMPLETE JM FULLY TESTED AND WITH 6 MONTHS WARRANTY 

TV lead, QL Software 2.35, Quill - Word Processor, Abacus — Spread Sheet, Archive 

Records, Easel — Business Graphics £1 25 
Customers buying one of the QL Computers are given one year's free membership to QUANTA 

(Help, Newsletters, & 400+ Library Programs — most free) 
QUANTA MEMBERS can obtain a £5 discount 
“The JM QL can run all Programs available for the QL system.” 
*% AJS ROM can be fitted & tested by EEC Ltd for an extra £25 at time of order, but not 
retrospectively * 


* SPECIAL OFFERS * 
While Stocks Last 
NEW PHILLIPS COLOUR 
MONITORS 


14in high resolution enhanced graphics, 85 
chars. RGS input. Complete with tilt & 
swivel stand, and QL lead ready to plug-in 
and go. RRP £379.00 


UNIVERSAL DISK DRIVE 


Imb, 3.5in cased, complete with built-in 
power supply, mains switch & I3amp plug, 


extemal dip switches adapt drive for QL, 
PC, Atari, Amiga, etc, comes with full 
instruction book, plastic cover, and free DS/ 
DD disk 
£89 inc VAT QL lead £12 
UNCASED DRIVES 


NEC FD1036A Imb 3.5in 1/3 height 
£49 inc VAT 
Epson 1/2mb 5.25 in 1/2 height 
£40 inc VAT 
QL lead for disk i/face £12 


(> 


£240 
inc VAT 


CITIZEN LSP-100 9-pin dot-matrix printer, Centronics, draft 150 & 175 cps, 30 
NLQ sheet or tractor feed. Epson FX & IBM graphics compatible. Centronics 
interface £20, if bought with printer 
C. ITOH DAISY WHEEL PRINTER serial prints at 20 cps, can print 1+3 copies. 
Paper width 13 ins, chars per line: 115, 138 or 172: selectable on top panel, buffer 256 
bytes. Obtainable extras; Centronics Module, 2 col ribbon, tractor & auto sheet feeder. 
Interchangeable plug-in interface modules for Star NL-10 printer. Serial, Parallel/Centronics, 
IBM/PC, or Commodore each £20 
Prices include VAT. Terms CWO, Access or Visa. Minimum order £10. 

Carriage £8.00 for printers & QL (overseas £20.00) other items £3.00 (overseas £8.00) 


EEC LTD 


18-21 MISBOURNE HOUSE, CHILTERN HILL, CHALFONT ST PETER, BUCKS. SL9 8UE 
Tel: 0753 888866 Fax: 0753 887149 


£120 
£140 


Firebirds £12 
Arcanoid II £12 


Thing & EPROM Manager £18 
QSUP £27 
lon Gold & Doppel Ion £12 


QLQ £20 
Brain Smasher! £13.50 


Please add £2.30 for postage and package. All programs except Arcanoid, Firebirds & lons need 


memory expansion, All prices excl. V.A.T, EXOE 


Please write for more information — especially about the Emulator! 


C.G.H. SERVICES 


Cwm Gwen Hall, Pencader, Dyfed, Cymru, SA39 9HA 
(Tel. 0559 384574) 


Tntelligent buffered moden vith text status 
messages. Hayes protocol, parallel printer 
port (can be used as 6k serial to parallel 
inter buffer). 24@vac or 9-12vdc. Autodial/ 
ae bee and many programmable registers inc! £25 - 6 month guarantee 
£8.00 £8.00 printer logging of RX and/or TX data. 
£13.00 £18.00 BT approved. Con be used vith any computer. 
£8.00 oar" NEWS U22/22BIS WITH U2.03 FIRMWARE NEW? 

: AC108@0 ¢V21 SO) seeeee eevecsevese E175} | London @1- dialling code is changing to 71- or 
£8.00 £8.00 ACIOBET (21/2 v2.83 + “tone ding) .. ee 1998. Use our look-up tables and 
£9.00 £12.00 \anubisuraes V2. Tr tg an rt file) conversion program to save 

£10.00 £10.00 
£8.00 £8.00 


£9.00 = 
£8.00 £8.00 
£8.00 £8.00 


QLs tested vith Thorn EMI test rig 
and ROM softuare 


(NOV harduare extra if required) 


flp— mdv 


Products Memory 


Type 


Text Adventure 128K 
Text Adventure 256K 
D-Day Mk II (Special Ed) Wargame 256K 
Dreamlands Text Adventure 256K 
From the Tower of Valagon Text Adventure 128K 
Grey Wolf U-Boat Simulator 256K 
Here We Go Text Adventure 128K 
MacSporran’s Lament Illustrated Adventure 512K 
Open Golf Golf Simulator 512K 
Orbiting Astronomical Sim 128K 
Personal Finance Manager Home Accounts 128K 
Polytext Multi column 

quill output 128K 
Quiz Game 128K 
Illustrated 

Role-Play Adv 256K 
Illustrated Adv 128K 
Horserace Prediction 128K 
Illustrated Puzzle Adv 128K £8.00 
Illustrated Adv 256K £10.00 
Text Adventure 256K _ 
Graphical Adv 128K £8.00 


Anel Pum Quat 
Blag2 


Disks contain 5 text lists in database import 
formats (quote delimited, etc) & a progrom for 


QuaLsof t Terminal | Rimisamiteeimialaaled 


: Files for major databases/sprdshts 
Viewdata-VIS2-0T100 GL TERMINAL EMULATOR 
“Een deluxe commnicatieprogramma van Kualsoft 


Multitasking for electronic mail, PRESTEL etc, 
CET dounload. Phone directories for ALL (yes ALL) 
modems for the QL, autodial (uhere poss) ond 
logon, tuo-uoy FILE TRANSFER to ATARI ST, IBM PC, 
Psion Organiser (via comms link), XMODEN, real 
time clock/timer, buffered logs to file/printer, 
transmit files, editable command line, Suedish/ 
Norugn/Geraan options, translates, editor etc. 
SOLVES ALL PACKAGED MODEM SOFTWARE PROBLEMS 
Unbuffered modems usable vith Miracle Modaptor 


Software (3.5" or adv) & manual £30 


COMPUTER CLEANER 


Much improved aains filters. 48-68 db cut 


£16.00 


£10.00 Foulty OL boards (excl plug in ICs) 


» €7 Circuit diags... 


Quiz Master 
Return to Eden 
£15.00 
£8.00 
£10.00 


Starplod 

The Gee Gee System 
Uncle Loonie’s Legacy 
Voyage of the Beano 
Voyage of the Beano 
Wreck Dive 


£12.00 


£8.00 Programs to transfer text AND programs 


error free COHODEN) betueen computers 


Please add 10% to all orders by post to cover p&p and other charges. 
We regret that we cannot deal with orders by Access or other cards. 
All monies must be in Sterling. 


Also available: QL Technical Review 1-4. Subscriptions to QL Technical 
review nos 5-8 £6.00. Adventurers’ Forum 1-9, subscriptions to QL Leisure 
Review nos 1-4 £6. The Bible — 9 discs — text files £30. We also distribute a 
wide range of Public Domain and Shareware titles. Please send an s.a.e. for 
details. We would like to hear from any programmers wishing to have their 
programs published. 
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& 3 spike filters. 398 joule cut (3 & 4 vay) 
Certified X/Y 248ac capaci tors 
2-vay (Sa adaptor)... + O14 


3-vay Ga adaptor)... O18 
4-vay (13 trailing socket) .. + £24 


All prices include Wal and postage in the 


12 Bouverie Place, London U2 IRB 


Available for IBM PC and compatibles, 
ATARI ST and Sinclair QL. Connects to 
Psion organiser via Psion comms | ink 


(tel: 671-724 9853) 


SCROLLING BBS FoR eeseziieAt MEL? ~ 871-706 2379 (All speeds te ¥22bis) 
Fax: 671-786 2379 Telex: 265451 (ref: 72:4A69@645) Prestel: 617249052 
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he SuperBasic series has tackled 
many subjects over the years but 
it has up to now avoided the 
specialist subject of games. This 
has largely come about by accident, but 
this serious omission is about to be put 
right with a short series of articles devoted 
to games written entirely in SuperBasic. 
There are four major categories of com- 
puter games: the category most people 
immediately think of when considering 
computer games is the arcade variety. 
Arcade games can be further broken down 
into sub-specialities such as “shoot-em- 
up” involving the traditional alien hordes, 
“duck-and-weave” such as Pacman, and 
“search-the-castle” hybrids which mix ar- 
cade style gameplay with elements more 
commonly found in text-based adventures. 
The main features of such Games are 
speed, noise, fancy graphics and a sense 
of power and danger. 


Basic games 


In the early days of the home computer 
revolution arcade games were commer- 
cially marketed in simple Basic, but 
nowadays all professionally-produced ar- 
cade games are written in high-speed 
machine code to provide as much visual 
impact and realistic action as the cpu will 
allow. The Basic language is normally 
thought of as being too slow and too 
limited for fast games. This is largely true 
even if the Basic program is compiled, but 
there has nevertheless been a steady 
stream of playable arcade-style games 
written completely or mainly in Basic and 
published in magazines like Sinclair QL 
World. Just glance at the Microdrive Ex- 
change for examples. 

Most Basic arcade games are based on 
or related to the early efforts of the compu- 
ter game pioneers because those early 
games were carefully designed to make 
the most of the powers of contemporary 
computers without exposing too many of 
their weaknesses. 

The earliest games played on comput- 
ers were entirely text-based and they form 
a category of their own: adventures. Ad- 
venture games tend to be of the “dungeons 


SUPER 


BASIC 


Mike Lloyd battles with alien 
forces to develop a playable 


arcade game written entirely in 
SuperBasic. 


and dragons” genre with a “quest” sce- 
nario, but successful adventures have 
been based upon murder mysteries, spy 
books and even the highway code. A 
typical format involves the description of a 
location and input covering movement, 
picking things up and avoiding dangers. 
Nowadays the techniques developed over 
the years for adventure games are finding 
their way into computer training pack- 
ages, with the computer responding 
appropriately to the trainee’s input. 

The satisfaction in both playing and writ- 
ing adventure games comes from the 
rational, logical representation of a realis- 
tic world in which every conceivable option 
has been catered for by the program. 
Recent adventure games rely on graphics 
to convey atmosphere and information, 
and some have replaced text input with 
on-screen menus or arcade-style re- 
sponses. Adventure games become very 
unsatisfying if a perfectly reasonable ac- 
tion is not permitted because the game 
designer did not think of it or if the game 
depends upon meaningless conditions 
being met — the door will not open unless 
you are holding a box of matches, for 
instance. 

A third category of computerised game 
comprises intellectual games such as 
chess, backgammon, Scrabble and even 
Monopoly. The essence of these games 
is to recreate on the computer screen 
games which are already familiar to us- 
ers. The computer can then become a 
highly capable opponent, using sophisti- 
cated “look-ahead” analytical techniques 
to replace human intellect. Some of these 
methods have been explained in the se- 
ries on a draughts program published in 
previous editions of QL World. 

The final category includes all simula- 
tors, be they flight simulators, car racing 
simulators or games which would not nor- 
mally be considered as simulations, such 
as computer golf and computer snooker. 
Quality wargames packages fit into this 
area of the games market, depending 
upon whether realism or combat ma- 
chismo is the aim. 

The satisfaction obtained from simula- 
tors tends to be in direct proportion to the 


illusion of reality created by the program- 
mer. There is a good argument that 
simulations have become too complex 
and fail to acknowledge that facing acom- 
puter screen and keyboard provides much 
less information than would be available 
in real life. The weight of a golf stroke 
cannot properly be gauged, nor can an 
aircraft's height above the runway be 
judged, when the only information avail- 
able is a low-resolution graphic of a small 
dial. 

This weakness of simulations is being 
tackled on two fronts: improving the dis- 
plays and changing the way user 
responses are handled. The Japanese 
have been experimenting with special 
seats with screens all around them and an 
“active” suspension to reproduce cockpits 
for car, aircraft and spaceship simulators. 
One of the more promising options be- 
coming available is a set of jumping pads 
which plug into a computer and detect the 
user’s foot movements. This turns athletic 
simulations into something much more 
credible. It cannot be long before even the 
humble exercise bicycle has a display 
screen so that users can race against 
computerised opponents. 

Each class of computer game holds its 
own peculiar challenges, and those of the 
arcade games demand programming 
techniques of far greater complexity than 
those normally expounded in this series. 
Nevertheless, the first game to be tackled 
in the Super basic series is very much of 
the traditional arcade variety, albeit with 
some interestingly original ideas included 
within it. Before getting down to detail in 
the next article it is worthwhile to consider 
some of the general problems which pro- 
grammers of arcade games have to 
overcome. 


Top speed 


Speed is by far and away the most 
important consideration when planning 
an arcade game in Basic. There is a 
constant conflict between adding special 
effects and keeping the program short 
and simple enough to ensure that it is fast 
enough. The fractions of a second differ- 
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ence between the speed of an IF com- 
mand, and its SELECT ON equivalents 
might not seem very important, but if a 
comparison is made within a loop at the 
heart of the program executed many times 
a second then it might well make the 
difference between a playable game and 
a non-event. 

Almost everything in a game program’s 
design is subordinate to speed, including 
conventional programming style. Forget 
long variable names, neat IF..THEN 
statements, clear algorithms and the divi- 
sion of a program into coherent 
procedures. For a Basic arcade game to 
work the code must be pared down to its 
most efficient, and every trick in the book 
to achieve this aim is valid, no matter how 
unacceptable it would be in a standard 
business program. 

At the heart of a typical game is a loop in 
which the screen is updated and user 
input is detected and acted upon. This 
loop, the main game loop, is where speed 
counts the most. The main game loop 
usually breaks down into a body of state- 
ments which are executed every time the 


Game loop 


loop is cycled and anumber of statements 
which are only executed if a condition is 
met (for instance if the user presses the 
“fire” button, or an alien hits the bottom of 
the screen). 

The efficiency of the main game loop is 
compromised by every GOSUB, GOTO, 
procedure call or user-defined function. 
Jumps out of the main game loop, by a 
GOSUB for example, shouldbe ruthlessly 
excluded from the fixed part of the loop 
and only tolerated when speed is not vital 
in conditional parts of the loop. There is 
therefore not much call for sophisticated 
structures such as user-defined proce- 
dures in an arcade game program except 
for ancillary features such as displaying a 
high-score table or animating the dying 
moments of the user’s battlestar at the 
end of a session. 

To keep a Basic game moving at an 
acceptable pace the number of objects 
having the appearance of moving simul- 
taneously must be reduced to an absolute 
minimum, which might mean only two or 
three items. The Space Invaders formatis 
not really suitable for a Basic conversion 
because it involves far too many inde- 
pendent aliens (and the products of their 
firepower) which must each be moved 
during one cycle of the main game loop. 
The Pacman format is much more accept- 
able, with only the one “munchy” controlled 
by the user and perhaps two or three 
“ghosties” haunting the maze. 

One way of giving the impression that 
there are a larger number of entities mov- 
ing on the screen is to create a string with 
anumber of items a few spaces apart. By 
printing the whole string, perhaps six things 
can be moved in the time it takes to move 
one, but of course their relative positions 
will be unchanged. 

Movement does not have to be pixel-by- 
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pixel in order to convince the player that 
something is actually moving when in fact 
it is being rubbed out at one location and 
re-drawn at another. Generally, move- 
ment in hops of one character position or 
one line is acceptable. The time between 
an object disappearing at one location 
and being replaced at another should be 
as short as possible and the time it then 
remains on the screen should be as long 
as possible before it is necessary to move 
it again. The main game loop should 
therefore be designed so that an item is 
drawn on the screen, its next location is 
calculated, and all the other actions which 
must take place are completed before it is 
overwritten pending its re-drawing some- 
where else. 

A potentially lengthy part of any game 
loop is the need to read keyboard input 
and respond to it. Generally, this means 
that the keyboard has to be read for input 
and, if detected, the input must be tested 
by a series of conditional statements to 
determine what action needs to be taken. 
Where conditions are mutually exclusive, 
for example where only a left cursor or 
right cursor keypress could have occurred, 
the most likely condition should be tested 
for first and the other possible conditions 
should be coded in an ELSE alternative, 
such as: 


IF fire_button THEN ... 
ELSE IF left_move THEN ... 
ELSE IF right_move THEN ... 
ENDIF 
ENDIF 

ENDIF 


Do not forget, of course, that for some 
games the most common condition might 
be no keypress at all, in which case this 
will have to be tested for before any par- 
ticular keypress is considered. 


Tuning clauses 


Where simultaneous keypresses are 
permitted, which must be true for the 
majority of arcade games, a different ap- 
proach must be taken. Each possibility 
must be tested for in each cycle of the 
main game loop, leading inevitably to a 
series of IF... THEN clauses. Even here, 
however, it is possible to save time by 
paying attention to the phrasing of the 
clauses. For example: 


IF NOT X THEN... 


might well be slightly slower than its 
equivalent: 


IF X=0 THEN... 

Where ranges are considered the scope 
for tuning commands to obtain maximum 
efficiency grows considerably. Ranges 
might be inclusive, like: 

IF X>= 7 OR X <= 11 THEN... 


or they might be exclusive, like: 


IF X>6ORX< 12 THEN .. 


There is usually merit in avoiding OR and 
writing IF statements to include AND in- 
stead — it is surprising how often this is 
possible. Ranges might also be broken 
down into two separate IF statements, 
such as: 


lf FX >6 THEN 
IF X < 12 THEN 


ENDIF 
ENDIF - 


With the QL, of course, it is also worth 
considering using the SELect construct 
instead of IF..THEN. Tips as to the faster 
of the two conditional constructs have 
been published in a recent SuperBasic 
article. 


Knowing it 


In order to extract maximum execution 
speed from a program and to include as 
much screen action as possible it is es- 
sential that you know your programming 
language and the capabilities of your 
computer inside out. The QL has some 
unusual quirks which generally make it a 
less suitable platform for computer games. 
It has no means of detecting whether a 
character has been printed at a particular 
location on the screen, for example. How- 
ever, it has superb conditional structures 
which permit boolean logic (more of which 
next month) to quickly act upon keypresses 
detected with the very fast and capable 
KEYROW command. It also has an unu- 
sual option to the OVER command which 
gives an additional form of overprinting. 

Programmers also need to be aware 
that procedure and function calls are 
slower than GOSUBs, that jump to a dis- 
tant part of a program take longer than a 
jump to a nearby part of the program, that 
normal QLs actually perform integer arith- 
metic more slowly than floating point 
arithmetic, that vertical and horizontal lines 
are much more quickly drawn using the 
BLOCK command than by the LINE com- 
mand, and so on. 

Increasingly these days, knowledge of 
standard SuperBasic needs to be supple- 
mented with knowledge of whatever | 
toolkits, replacement Roms and compil- 
ers are pressed into service alongside it. 
For example, both the Minerva romand all 
the Basic compilers perform integer arith- 
metic much more quickly than floating 
point arithmetic. Another worthwhile ex- 
ample of useful knowledge is that the 
Lightning screen accelaration program 
works at its fastest if characters are an 
exact number of bytes wide (eg CSIZE 
0,1) and they are printed at a screen 
location whose horizontal offset from the 
edge of the screen is exactly divisible by 
four. 

In next month's article the process of 
designing an arcade game will be illus- 
trated by a relatively fast and original 
arcade game programmed totally in 
SuperBasic. 
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Programmin 


he previous article on C prog- 

ramming was mainly concerned 

with the basic structure of a 

program. We also took a look at 
how to compile and run a program using 
the Digital C compiler. 

This month we'll take a more detailed 
look at some C facilities. 

The main areas covered are: 

a) defining symbolic constants 

b) defining and using variables 

c) sequence control statements 
(while and for) 

d) conditional statements 
Two C program listings are included to 
illustrate these facilities. The program in 
fig. 1 performs a fairly simple task. It 
counts the number of characters that you 
type in. When you press the (ESC) key it 
tells you how many keys you pressed and 
then stops.|f you type in more than 32765 
it stops automatically without you having 
to press (ESC). The program displays 
each character as you type it — but it is not 
especially fancy. Many characters on the 
QL keyboard do not produce displayable 
characters — these will appear as blobs on 
your screen. Examples of such keys are 
the (TAB) key and the arrow keys that 
usually move the cursor around. Inside 
our C program the arrows and (TAB) 
simply get displayed as blobs! 

The first two lines of the listing in fig. 1 
define things known as symbolic con- 
stants. In our program these are named 
MAZ__INT and ESC. MAX_INT is given 
the value 32767 and ESC is given the 
value 27. When the program is compiled 
the C compiler (parser) replaces every 
occurrence of MAX__INT by 32767 and 
every occurrence of ESC with 27. The 
only exception to this rule is that if 
MAX__INT or ESC are enclosed within 
double quotation marks (eg “MAQX- 
__INT”) they are left alone and not 
replaced). 

Symbolic constants are defined using 
the following syntax: 


#define SYMBOLIC_NAME value 


Itis conventional to use upper case letters 
in symbolic constant names. Underscore 
characters, alphabetic and numeric char- 
acters can also be used in SYMBOLIC 
—NAMES. 

The value assigned to the SYMBOLIC 
NAME can be almost anything. Usually 
every #define appears at the start of the 
program before the main function. 

Using symbolic constants can some- 
times make programs easier to under- 
stand and easier to change. We are using 
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MAX__INT to represent the maximum 
value that Digital C allows an integer 
variable to have (32676). ESC represents 
the Ascii character that is produced when 
you press the (ESC) key on a QL 
keyboard (Ascii code 27 decimal). 

All program variables must be declared 
before they are used. Usually they are 
declared at the beginning of the main 
function — just after the curly bracket. 
There are a few other places where you 
can declare variables, but for now stick to 
the beginning of main. 

Fig. 1 declares two variables. The first 
is named num_characters and is an 
integer. The second is named inp__char 
and is a character. 

The basic syntax used for declaring 
variables is: 


data_typ variable_name; 


You can declare many variables of the 
same data type using: 


data_type variable1, variable2, variable3; 


When variables are declared in C they 
are not normally given any initial default 
value. Unless you assign a value to a 
variable (see below for details) it will 
contain an unpredictable garbage value. 

Digital C supports two basic data_ty- 
pes — int and char. In future articles we'll 
take a look at arrays and pointers. Full 
implementations of C include floating 
point (decimal) numbers. Digital C does 
provide some facilities for handling float- 
ing point variables — again we'll consider 
them later. 

In Digital C an int can hold a value in the 
range —32768 through +32767. Some 
implementations of C can cope with larger 
values (sometimes they use a data__type 
known as long int to do this). 

Achar can hold a single Ascii character. 
Ascii characters have codes in the range 
0 through 255. The QL Concepts manual 
that is provided with the QL gives details 


printf 


separated by commas); 


In the second 
article on his 
new C series, 
Andy Wright 
moves onto 
facilities, 
including 
variables and 
control 
statements. 


of which code represents each of the 
characters. 


To assign a value to a variable use: 
variable_name = expression; 


An expression often consists of con- 
stants and/or variables_names linked 
together by arithmetic operators such as 
+, —,* and /. Some examples are: 


/*Assuming x, y and z have been 
declared as type int */ 

x= 1; 

y=x+7; 

Zz = (x + y) * 15; 


In fig. 1 both num__characters and 
inp_char are assigned an initial value of 
zero. One curious point about char vari- 
ables is how they are assigned values. 
The statement: 


inp—char = 0; 


stores the character whose Ascii code is 
zero (NULL) in inp__char. 
In a similar fashion: 


inp__char = 65; 


stores an upper case A in inp__char (Ascii 
code 65). For characters that can be 
typed in from a keyboard, however, you 
can use: 


inp_—char = ‘A’; 


This stores the Ascii character A in 
inp_char. The C compiler can only 
manage this if you include the apos- 
trophes (single quotes) on either side of 
the cnaracter — if you don't then it expects 


* you to use a numeric value in the range 0 


through 255. 

The next few lines of fig. 1 print some 
messages. Last month we covered the 
basics of the printf function. In fact, printf 


(“words to print and print_formats”, expressions and variables 
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#define MAX_INT 32767 


#define ESC 27 


Programming 


/* Defines some symbolic constants */ 


main ( ) 


{ 
int 


char inp_char; 


num_characters; 


/* Define an integer and a character variable */ 


num_characters = 0; 
/* We haven’t read any characters yet */ 


printf("This program counts the number of keys that you press\n"); 


printt(* 


MAX_INT - 1 ); 


inp_char = 0; 


until you press ESC or type %d characters\n\n", 


. 


/* Makes sure that inp char isn’t already ESC by coincidence */ 


while ( inp_char |= ESC && num_characters < (MAX_INT - 1) ) 
/* Loop round until all characters have been entered */ 


{ 


inp_char = getchar(); 
/* Get a character from stdin */ 
if ( inp_char != ESC ) 


{ 


num_characters = num_characters + 1; 


/* Only increment num_characters if inp char |= ESC */ 
putchar(inp char); 


/* Write the character to stdout */ 


} 


} 

printf("\n\nThe number of characters entered was: %d\n\n", 
num_characters) ; 

/* Write the results to stdout */ 

printf("Press a key to quit"); 

inp_char = getchar(); 

/* Wait for key before terminating */ 


Fig 1: Character counting program 


allows you to print a character string and/ 
or the values of program variables. The 
basic format is on the previous page. 
The double quotes must be included. The 
words to print can include almost anything 
— including special characters such as \n 
to force a line feed. You can alsoinclude 
details to tell printf how to print program 
variables and expressions. These print- 
—formats always start with a % sign. In 
fig. 1 %d has been used. The %d 
indicates that the variable should be 
printed as an integer. %c would have told 
printf to print it as a character. If you want 
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to print a real % symbol using printf you 
should use \% in the words to print string. 
There should be one expression or vari- 
able for every % format specification. 

The printf function always writes its 
output to a device known as stdout. This is 
normally the computer screen. 

Note that in the second printf the value 
of MAX__INT —1 is printed. The compiler 
replaces MAX_INT by its value (32767) 
and so the coding works. If MAX_INT 
were within the quoted string of printf the 
compiler would not have replaced it! 

The next part of the program in fig. 1 


uses awhile loop. The loop in the program 
keeps going round and round until you 
press the (ESC) key. The loop used in the 
program could have been written more 
elegantly - but we can afford to be more 
elegant later. The while loop structure is: 


while ( condition ) 
f 


l 
statement; 
statement; 


— 


The statements enclosed between the 
curly brackets are executed over and over 


Programming 


again so long as the condition is true. 
When the condition becomes false the 
loop is terminated and control passes to 
the statement after the closing curly 
bracket. The statements within the curly 
brackets make up what is known as a 
compound statement. 

In a similar fashion to SuperBasic, in C 
conditions are actually expressions. If the 
expression evaluates to zero then the 
condition is false, otherwise it is true. 

Some of the comparison symbols in C 
are different than those used in Super- 
Basic. For example: 


is not equal to 
is equal to 

is greater than 
is less than 
not 


re 4 he | 


Using == instead of = when compar- 
ing values is something that most new- 
comers to C find very confusing. Only use 
= in value assignment statements — if you 
use it when comparing values you will get 
unexpected results. 

Several conditions can be linked 
together (as in SuperBasic) using the 
following logical operators: 


&& means AND 
|| means OR 


(two of SHIFT and the key at the top right 
hand corner of a QL keyboard). 


Parentheses () can be used inside 
complicated conditions (as in Super- 
Basic). The While loop in fig. 1 keeps 
going until inp__char is equal to the (ESC) 
key or num__characters is eugqal to the 
highest valid integer value minus 1. If 
num__characters were allowed to get 
bigger than 32767 then it would end up 
holding an incorrect value. 

Within the while loop, the getchar 
function is used to read a character from 
the standard input device (stdin) into the 
variable named num_char. The basic 
syntax is: 


variable _.name = getchar (); 


The variable can be either an int or a 
char. The stdin device is, by default, the 
keyboard. 

If the value of inp__char is not equal to 
the Ascii code for the (ESC) character 
the value of the num_characters is 
increased by one and the character is 
displayed on the screen using putchar. 
The basic syntax of the if statement is: 


if ( condition ) 


statement; 
statement; 


If the condition evaluates to true then 
the statements enclosed within the curly 
brackets are executed. As with the while 
loop, the condition is actually an express- 
ion — if it evaluates to zero then the 
condition is false, otherwise it is true. You 
can also use: 


if (.condition ) 
{ 
statement; 
statement; 
} 
else 
{ 
statement; 
statement; 


It is possible to nest if statements within 
each other. 

The putchar function is used to write a 
single character to the standard output 
devide (stdout). This means that we get to 
see the characters as we type them in — 
the getchar function does not display 
anything on the screen. The basic format 
IS: 


putchar (character); 
The character used in putchar can be: 


the name of a char variable 

an integer representing an Ascii charac- 
ter code 

a character enclosed in single quotes 


Instead of using putchar we could have 
used: 


printf (“%c”, inp__char); 
/* %c prints it as a character — %d would 
print its decimal Ascii code*/ 


When the while loop is terminated the 
results are printed together with the 
message “Press a key to quit”. The 
program then waits for a key to be 
pressed by using the getchar function. 
This technique of waiting for the user to 
press a key before reaching the end of a 
program is useful if you plan to run the 
finished product in a windows environ- 
ment such as that provided with Qram. In 


a windows environment the program runs 
within a window and all of the output to 
stdout appears in the window. 

When the program finishes the window 
is closed and its contents disappear. If 
you're not careful then the window dis- 
appears before you get a chance to look 
at the results. The extra getchar at the end 
of fig 1 stops the program from finishing 
before user reads the final message. 


Exercise 1 


Try some of the following — it’s probably 
best to handle each of them as a separate 
exercise and undo the changes before 
carrying on with the next one. 

1. Miss out the brackets from the 
condition in the while or if statement. 

2. Remove the line that sets inp__char- 
acters to an initial value of zero. 

3. Remove the line that sets inp__char 
to an initial value of zero. Try running the 
compiled program a few times. 

4. Change the program so that it stops 
when the user presses ‘Q’. 

5. Remove the %d print_format defini- 
tion from one of the printf statements. Also 
try including more print_formats than 
there are values to be printed. 

6. Write a program to find out what 
happens when an int variable gets bigger 
than 32767. Start off by giving the int a 
value of, say, 32760 and go round a while 
loop which prints the integer value and 
then adds one onto it until the user 
presses the (ESC) key. You needn't 
bother printing the character that the user 
types in each time you go round the loop. 

7. You can do arithmetic on char 
variables in the same way as with int 
variables. Write a program to find out what 
happens when achar variable gets bigger 
than 255. Take the same kind of approach 
as you did with the int example above — 
but starting from a value of, say, 250. Try 
to print the value of the char variable as an 
integer value (%d) and as a character 
(%c) using the printf function. 

The listing in fig 2 counts the number of 
characters, words, alphabetic characters, 
spaces and numeric digits that you type 
in. You should be able to understand most 
of it already. It introduces a few new C 
standard library functions and the struc- 
ture of a for loop. In the next few 
paragraphs we will only consider the 
new concepts. 

In fig 2 the main processing loop is 
driven by a for statement. The basic 
syntax of this is: 


for (initial statements separated by commas; condition; 
statements for end of each repetition separated by commas) 


{ 


statement; 
statement; 
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#define TRUE 1 


#define FALSE 0 
/* Defines some symbolic constants */ 


main ( ) 
{ 
int num_characters, /* Counts total characters */ 
num_spaces, /* Counts spaces */ 
num_alphas, /* Counts alphabetic characters */ 
num_numerics, /* Counts number of numeric digits */ 
num_words, /* Counts words */ 
within_a_word; 
char inp char; 


printf("This program counts characters and words etc\n"); 
printf(" until you press ESC\n\n"); 


inp_char = 0; 


for ( num_characters = 0, num_alphas = 0, num_spaces = 0, 
num_numerics = num_words = 0, 
within_a word = FALSE; 
(inp_char = getchar()) != ESC; 
++num_characters ) 


putchar(inp char); 
if ( inp_char == ' ° ) 
++num_spaces; 
if ( isalpha(inp char) ) 
++num_alphas; 
isdigit(inp char) ) 
++num_numerics; 
inp char == ‘ ’ || inp char == ‘\t’ || 
inp_char == ‘\n’ ) 


within_a_ word = FALSE; 


if ( I!within_a_ word ) 
{ 
if ( isalpha(inp_ char) ) 
++num_words; 
within_a_word = TRUE; 


} 


printf("\n\nThe numbers entered were\n\n") ; 

/* Write the results to stdout */ 

printf("Alphas Numerics Spaces Words\n"); 

printf ("%6d%9dt7d%6d\n", num_alphas, num_numerics, 
num_spaces, num_words) ; 

printf("\n\nPress a key to quit"); 

inp_char = getchar(); 

/* Wait for key before terminating */ 


Fig 2: Multi-counting program 
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All of the statements between the curly 
brackets are executed on each pass 
round the loop 

The initial statements are all executed 
once before the first pass through the loop 
of curly bracketed statements. The initial 
statements are not executed again as the 
program loops round the bracketed state- 
ments. Note that the initial statements are 
separated by commas! The coding in fig 2 
illustrates that you are allowed to use: 


variable = variable = variable 
= expression; 


to assign values to many variables in a 
single statement. 

The condition is similar to the type used 
in while and if statements. The loop 
continues so long as the condition is true. 
In fig 2 the condition is a little more 
complicated than the ones that we've 
seen before. It is: 


(inp__char = getchar()) !=ESC; 


The positioning of the brackets is 
important. You may find that you need to 
read through the next few paragraphs 
more than once (slowly) to make sense of 
them. 

The getchar() function requires an 
empty set of brackets. The outer set of 
brackets force the value returned by 
get_char() to be passed into inp__char. 
The results of this is then compared with 
ESC. 


Without the outer brackets the value 
returned by getchar() would be compared 
with the ESC character. If it was != ESC 
then the result is TRUE (non-zero) other- 
wise it is FALSE (zero). This TRUE or 
FALSE result (non-zero or zero) would 
then be fed into the inp__char variable. 
The final result of the condition is then 
based on whether or not inp__char now 
contains zero or non-zero! This would 
guarantee that the program didn’t work as 
desired! 

This type of condition is more elegant 
than the one that we used in the while loop 
of fig 1. It means that the statements 
within the loop do not need to check if 
inp__char is equal to ESC — if it is ther the 
loop is automatically terminated. 
Although this new condition is more 
elegant than the old version, it is also a bit 
harder to understand. 
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The statements for the end of each 
repetition are executed at the end of each 
pass round the loop. If many statements 
are included they must be separated by 
commas. Note the use of the statement + 
+num__characters — this has the same 
effect as num Ocharacters = num 
_characters + 1 (it is a useful short- 
hand). 

Some of the if statements in fig 2 look a 
bit different from before. The syntax used 
is: 
if (condition) 
statement; 
statement 2; 


No curly brackets have been included. 
This means that statement is only execu- 
ted if the condition is true. Statement2 is 
not included as part of the if statement. 
The basic idea is that if you want to make 
several statements dependent upon a 
condition you must use curly brackets to 
form a compound statement. If only one 
statement is to be dependent then the 
curly brackets are not needed — but you 
can include them if you want to. 

The way that the code is indented in the 
example makes it look obvious what 
is happening. However, remember that 
the C compiler could not care less about 
the way that your code is indented. 
However you choose to indent the code, 
statement2 will always be executed if no 
curly brackets are used! 

This principal applies to while and for 
loops also. For example: 


while (condition) 
statement; 
statement 2; 


Because curly brackets have not been 
used, only statement! is executed as part 
of the loop. Statement2 only happens 
after the loop has finished. 

Most of the coding within the for loop 
uses some standard library functions to 
work out whether or not inp__char is 
alphabetic, a numeric digit etc. Each of 
these functions return TRUE or FALSE. 
Note the use of the == symbol when 
comparing inp__char with a space. 


If (inpD_char == '’) 


If a single = symbol were used it would 
mean: make inp__char equal to a space 
(Ascii code 32). If inp__char is then 0 
(which it won’t be — it will be 32!) the 
condition is FALSE, otherwise it is TRUE. 
The accidental use of = instead of == 
can cause newcomers to C a lot of 
frustration! 

The only tricky bit involved in the loop is 
keeping track of the number of words that 
have been entered. It is made even more 
tricky when you try to define what you 
mean by a word and what kind of 
characters you expect to be used to 
separate words from each other. In fig 2 
words are assumed to begin with an 


alphabetic character and are separated 
by spaces, tabs and newline characters. 

Whenever a character that is a word 
separator is detected the within 
—a_word variable is set to FALSE, this 
indicates that we are not currently inside a 


’ word. 


When any other character is detected 
nothing happens if within__a_word is 
TRUE. 

If within__a__word is false it means we 
are possibly at the beginning of a new 
word. If the inp__char is alphabetic then 
the num__words variable is incremented 
since we really are at the beginning of a 
new word. The within__a_word variable 
is set to TRUE so that the next input 
character doesn’t cause num__words to 
be updated again. 

The printf function near the end of fig 2 
illustrates another facility. The use of %6d 
as a print format tells the compiler to print 
the integer value right aligned in a 6 
character field. This makes the printed 
values line up correctly underneath the 
headings that are output by the previous 
printf. 


Exercise 2 

1. No check has been made to stop 
num__characters (or any of the other 
integers) from exceeding MAX_INT. 
What would be the consequence of this 
happening? Change the code so that it 
cannot happen. © 

2. Try replacing the == in the check 
inp__char == "’ by a single = symbol. 

3. Make the program count the number 
of lines that you enter. The (ENTER) key 
on the keyoard enters a ‘\n’ (newline) 
character. 

4. Try printing some of the results with a 
print format that is too small (eg %1d). 

5. Change the program so that word 
separators are any characters which are: 


not alphabetic 
and not one of: 


(apostrophe) 
- (hyphen) 
— (underscore) 
digits 0 through 0 


Compiling and running 

If the Digital C disk is on flp1__ and the 
program code is in a file named 
myprogram_c on flp2__ use the following 
to compile, link and run it. If error messa- 
ges appear when you run the compiler 
you should edit the C program and 
compile it again. 


exec__w flp1__cc (ENTER) 
flp2__myprogram —p —m (ENTER) 
exec__w flpi_cg (ENTER) 
flp2__myprogram__exe_ flp2__myprogram 
—m —p —nc —d/flp1_. (ENTER) 
exec__w flp2__myprogram__exe 


Remember that Digital C source program 
files must end with —c. 
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SOFTWARE 
We care for the QL 


HOME BANKER PLUS - £19.95 (3.5" disc) Version 4.0 
Home Banker Plus lets you and your expanded QL keep control of your finances. Each Home 
Banker file stores details of up to 14 accounts in complete security (the four figure code 
supplied with the program can be changed). Regular payments and receipts can be input 
as standing orders and are added to your account automatically. 

Home Banker Plus is completely menu-driven, and all transactions are accessed using the 
cursor keys or single letters (as preferred). Options available include Balance (showing your 
actual balance and the balance your bank tells you), Statement (allowing detailed state- 
ments to be printed out or viewed on the screen), Interest (which calculates approximate 
interest paid), Mini-Statement (giving the last twelve transactions), Full Balance (the 
balance of all accounts together with the total balance) and Search (which finds transactions 
without needing to look at a statement). 

One of the major powers of Home Banker Plus is the Analysis option that shows you how 
much you have spent in certain areas (e.g. computing) over a period of time. Analysed 
balances and statements are available, and all the categories used can be viewed or printed 
at the touch of a key. 

So that you do not need to load dated information every time you use Home Banker Plus, 
the package includes a module that can remove old information from the main data file, 
storing it elsewhere on the disc. 

For those of you without memory expansion, a microdrive Home Banker is available at 
£14.95. Although this version does not have all the features described above, it is still a 
powerful tool (standing orders and analysis are available). 

"If any software will convince doubters it is worthwhile keeping tabs on their finances, Home 
Banker will do it. It is a pleasant program to use, needs no specialist knowledge of banking 
or accounts, and the routines for entering transactions are fast . . ." SQLW, 3/89 


DJW COMPENDIUM - £9.95 (3.5" disc) 

This compendium disc contains a selection of past DJW programs, such as Diary, QLuck 
(the five-dice game), Qodebreaker (can you guess the hidden code), Housewife (the 
cookery and shopping program) and Software Directory. 

"an interesting and useful program" (Housewife) SQLW, 2/87 


Available from: 
DJW Software (QLW11), 11 Pound Close, Bramley, Basingstoke, 
Hants. RG26 5BL 
Tel: (0256) 881701 Fax: (0256) 882750 


Payment by Access, Mastercard, Visa 
(quote number and expiry) or UK cheque Access 


VISA or postal order payable to 'DJW Software’. 
Overseas orders please add £2 p&p. 


Bee Orders are normally despatched within 
3 days of receipt 
Sinclair/QL World June 1990 
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Itis now eight years since I bought my first 
computer, a Sinclair ZX Spectrum, at the 
age of 13, back in 1982. At the time it was 
sufficient for my needs — learning abut 
computers and playing games! There was 
little opportunity at school to use comput- 
ers, and there was little choice in home 
computers at the time. 

A few years later, | wanted a more pow- 
erful micro. At this point, in 1984, the 
Sinclair QL was making its appearance, 
and it sounded like a wonderful machine. 
Several months later, once I had managed 
to get together sufficient money (part of 
which came from selling the Spectrum), I 
finally bought one. By then the dreaded 
kludge had gone, and the QL was fairly 
near completion. The keyboard was much 
better than the old Spectrum rubber one, 
and even now, after using many ‘proper’ 
keyboards, it still seems good. I am still 
using that machine, and have had no prob- 
lems, except towards the end of the first 
year when | returned it under warranty for 
a faulty microdrive mechanism to be re- 
paired. 

The only leisure software available back 
then consisted of two textadventures (West 
and Zkull, both produced by Talent) and 
Psion Chess. 1 bought Zkull and the chess 
game from W H Smiths, since QL software 
was available in shops at the time. Now 
nearly everything has to be bought by mail 
order, but I have had no problems with 
such companies. These two games have 
probably been the cause of more intensive 
thought than any other software I have 
used! I am nearly always beaten by Psion 
Chess, while Zkull has yet to be com- 
pleted. One benefit with the QL was that, 
since no one else had one, there was no 
problem at school, where not pirating soft- 
ware was deemed strange among my 


peers. 
At first the basic QL hardware was suf- 


16 REMark LISTING 2 - 


*Skeleton’ 


ONE MAN’S SYSTEM 


Neil Gordon trusts the 
QL with his health and 
education. 


ficient for my limited requirements. | used a 
Saisho TV / Monitor for my vdu, a job which 
it is still happily fulfilling. Dixons supplied 
a suitable lead. In this first year, the absence 
of commercial software encouraged me to 
do more programming than I might other- 
wise have done. This time of exploring the 
QL’s abilities was very enjoyable. 

Slowly my software collection increased, 
though generally only with games. [bought 
QL User from the start, and frequently cop- 
ied the listings published in it, and later in 
QL World. To simplify finding and loading 
particular programs on a microdrive car- 
tridge, which often contained 40 or more 
files, | wrote a program to list all the files on 


20 REMark results analyser from stats program. 


30 REMark Load stats first, 


then merge this with it~ 


21@ PRINT #titlewindow;’BLOUD GLUCOSE STATISTICS.’ 


300 

3196 

320 

3465 
3475 
3477 
3631 
3682 
3633 
3634 
3685 
3636 
3637 
3688 


maxval=25 
minval=0 


RESTORE 3693 
FOR x=1 10 3 
READ y 


END FOR x 
DATA 3.5,5;3 


defaultdevice$=* mdvl_glucose_’ 


PRINT #datawindow; TO 9;’Blood Glucose against days.’ 
PRINT #datawindow;TO 9;*Lines for Max,Optimal & Min.’ 
PRINT #datawindows\\\Vm Vm Vo VP VS 

REMark Draw lines for optimum max,normal&min blood glucose levels 


a cartridge and allow their selection by at 
most two key presses. 

At the age of 18 I started a joint math- 
ematics and computer science course at 
Hull University. In the first year we learnt 
Pascal and had several programming as- 
signments on the departmental IBM 
compatibles. My experience with Superbasic 
proved to be very useful since it has many 
similarities with Pascal. I bought a Pascal 
compiler (by Computer One) which al- 
lowed me to try out programsat home. The 
programming assignments required two 
reports to be submitted: an initial one, and 
then a final one with the completed pro- 
gram. I bought a Brother HR-5 thermal 
printer which provided high enough qual- 
ity output to be suitable for the reports. It 
also allowed me to take printed listings to 
copy onto the Departments micros. 

By this stage, I was reaching the limita- 
tions of a standard QL. Quill with 
microdrives is not very inspiring! Miracle 
Systems’ 512K Expanderam was available 
fairly cheaply at the time because of the 
fairly low cost of ram chips back then, so I 
bought one from Byteback, together with 
the QFlash toolkit rom which gave me a 
‘permanent’ ramdisk. 

This system proved adequate for writing 
a summer vacation essay about comput- 
ers! In fact Quill has beena very good word 
processor, capable of all the tasks I have 
put it to, which included writing cvs. 

I was given a disk drive system for 
Christmas in 1988. This consisted of a 
Cumana interface together with a single, 
double sided, double density drive. Strong 
Computer Systems supplied the system, 
which included 10 disks. This improved 
things a great deal, and the entire system is 
excellent. 

Over the past five years I have bought 


The author with his compact QL set-up. 


program to produce blood glucose 


LINE #datawindow, leftorigin, (y-minval) *yscale TO 140, (y-minval) #yscale 
LINE #datawindow, leftorigin, (y-minval) *yscalethiyposn TO 146, (y-minval) *yscalethiyposn 
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16@ REMark LISTING 1. 
116 REMark Nei! Gordon. 1y¥e8 
126 REMark General statistical analysis of 
discrete data. 
136 PEMark Holds one months figures, and ca 
lculates 
146 REMark the mean and modal values, both 
overal | 
150 REMark and by fields. (NB 7 fields) 
166 REMark Best keeping to 2 digit data for 
table layout. 
17@ REMark Ie. Integers im range -9Y to 99. 
180 init 
196 Inmit_display 
206 REMark title 
210 PRINT #titlewindow; *STATISTILAL ANALYSE 
re 
220 displayal ldata 
230 menu 
246 STUP 
250 DEFine PRUCedure init 
260 REMark initialise data & main data stru 
cture. 
270 RESTURE 
280 REMark default values 
290 defaultfti let="No Name’ 
300 defaultdevice$=’ mdvl_’ 
310 maxval=99 
3260 minval=-99 y 
3360 rullval=1@0:REMark used to signify ‘no 
data value. 
34@ x«min=2:REMark left hand position of da 
ta for printing 
356 DIM daysdata (31,7) :REMark 1 month,7 te 
sts a day-~ 
360 resetdata 
37@ END DEFine init 
386 DEFine PRUCedure resetdata 
390 REMark Initialise to nullval - program 
ignores such values 
406 FUR x=1 TO 31 
410 FOR y=i TU 7 
20 daysdata (x,y) =nullval 
430 END FUR y 
446 END FUR x 
450 END DEFine 
466 DEFine PROCedure init_display 
470 LuCal wwidth,herght, xpos, ypos.n 
456 MODE 4 
490 UPEN_NEW #3, s5cr_512x256a0x0 
5060 PAPER #3,4 
Sis ~Pies a 
520 CLOSE #3 
5326 READ numberoftwindows 
5460 FUR n=3 TU numberofwindows+2 
556 READ wwidth, height, xpos, ypos 
560 OPEN_NEW #n,con_ 
578 WINDOW #n,wwidth, height, xposts, yposts 
53e PAPER #n,@ 
SY9e@ CLS Fn 
6008 WINDOW #n,wwidth, height, xpos, ypos 
610 PAPER #n, 7 
520 INK #n,@ 
630 CLS #n 
640 NEXT 
650 REMark window data 
b6u DATA 6:REMark number of windows 
678 datawindow=3 
640 DATA 302,130, 20,30 
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690 menuwindow=4 

798 DATA 96,708,355, 36 

710 Inputwindow=5 

720 DATA 362,11,20, 222 

730 resultswindow=46 

740 DATA 136,136,355,110 

7508 statuswindow=7 

760 DATA 250,11,25,10 

778 titlewindow=3 

730 DATA 156,11,330,16 

797@ REMark end window data 

300 END DEFine init_display 

$16 DEFine PROCedure menu 

826 LOCal ch$,choice 

330 REPeat loop 

B40 PRINT #statuswindow;’ Present File is 
* Sdefaultfi les 

50 CLS #menuwindow 

36Y PRIN] #menuwindow,’1 - Load’ \’2 - Sav 


? 


*3 - Input Data’ \’4 - Results’ \’5 - Zap’ 
- Wuit’\’/ - Graph’ 
REPeat chloop 
ch#= INKEY$ (-1) 
Bye IF ch# INSTR "1234567" <> @ THEN EXI 
T chloop 
END REPeat chloop 
LLS #menuwindow 
choice=chF 
Select UN choice 
=1: loader 
=2: Saver 
=3: adder 
=4: results 
=5: Zapper 
=6:qu1 ter 
=7: 9raphs 
END SELect 
LLS #inputwindow 
1636 END REPeat loop 
1464@ END DEFine menu 
1950 DEFine PROCedure adder 
1660 REMark input data 
1076 LUCal daynum, testnumber, inputstringas, 
Tnputva lue 
1080 REPeat adder loop 
19990 INPUT #inputwindow: *Day - *;inputstr 
ngs 
119¢ IF inputstring$#=** THEN EXIT adderlo 
op 


1110 
1120 


19090 
1136 
number 
1146 IF testnumber<1 OR testnumber?/ THEN 
GO TO 1130 
1156 INPUT #imputwindow;’Vata Value - oy 
nputstrings 
11466 IF inputstrinas=’ 
1176 datava lue=nul iva! 
1130 ELSE 
1199 datava lue=inputstr nat 
1260 IF datavalue<minval UR datavalue>ma 
xVal THEN GU TO 1150 
1219 END IF 
220 daysdata (daynum, testnumber) =datavalu 
e 
1230 
1246 


co - @ 
Os 
Sec-r 


is 
oc 
Ss 


daynum=inputstrings 5 
IF daynum<1 UR dayrum>41 THEN wu TD 


INPUT #inputwindow;* lest No - *Stest 


THEN 


displaydata (daynum , (testnumber) 
END REPeat adder loop 


12560 CLS #inputwindow 
12646 CLS #resultswindow 
1276 END DEFine adder 
1250 DEFine PROLedure printdata (x) 
1290 REMark print data in red if <¥, In bl 
ack 1f +=¥ 
1300 RFEMark x=nullval means ignore 
1310 IF x=nullval THEN REIurn 
1320 IF x<® THEN 
1336 INK #datawindow, 2 
1346 PRINT #odatawindow; -x 
1356 INK #datawindow,¥ 
136¢ .ELSE 
1374 PRINT #datawindow; x 
1380 END IF 
1396 END DEFiIne printdata 
1400 DEFIne® FRULedure displayal ldata 
1416 LuUCal *,y,num 
1426 CLS #datawindow 
1436 PRINI #datawindow;’ Date. 
Date. Time_’ 
1446 AT #datawindow,1/7,31 
1456 PRINT #datawindow;” (Neégative=red) * 
1466 FUR num=l1 fu 2 
1476 FOR tst=1 Iu 7 
1450 Al Fdatawindow, 1,xmint2o* (num=2) +ts 
t#3;5 
1490 PELNI Fodatawindow; tst 
1500 END FUR tst 
1516 END FUR num 
15260 FUR nmum=1 TU 331 
1536 x==mM1h 
1540 y=nunm 
1556 IF mum?16 THEN x=xmint25:y=y-16 
1560 AT #datawindow,ytl,x-1 
1578 PEINI #datawindow:; num 
15808 FUR tst=1 [Tu / 
1590 Al Fdatawindow,ytl, xt (tst#s) 
1606 printdata daysdata (num, tst) 
1610 END FUR tst 
1626 END FUR num 
1630 KREMark draw table 
1646 LINE #datawindow,16,6 TO 146,89.5 To © 
SOL ad 
1656 LINE #datawindow, 16,89.5 TO 63,89.5 
1660 LINE Fdatawindow, 63,0 TO 63,39_.5 TO 
124,395 
1670 LINE #datawindow, 71.4 TO 71,89.5 
1456 FND DEFine displaydata 
1670 DEFine PRULedure displaydata (no, tstno) 


1766 REMark display one item of data 

171¢@ -LOCal x,y 

1720 = x=xmin+tstno*¥3 

1730 y=notl 

1/40 IF mo>16 THEN y=y-16:x=x+25 

1750 AT #datawindow,y,x 

1766 PRINT #datawindow;”’ ” 

1770 Al #datawindow,y,x 

1730 printdata daysdata (no, tstno) 

179@ END DEFine 

1304 DEFine PROCedure saver 

1516 LULal devicenames, fi lenames, names, num 

ber, tstnum 

1320 INPUT #inputwindow;’ Save Data - Sure? 
* sch 

1330 IF NUT (ch$==’y’) THEN RETurn 

1846 PRINT #inputwindow;’ File Device (defau 


> 


It-’ ;defaultdevice$;*) - *; 


1350 INPUT #inputwindow; devicenames 
1360 IF devicenamet=’* THEN 
1370 devi cenamet=defaultdevicet 


1886 ELSE 


1s7e detau | tdevice$=devicenamet 


196@ END IF 


1710 INPUT #inputwindow;’File Name - *5;f1 


lenamesd 


19720 LF f1 lenames="" THEN 
1930 fi lenamet=defaultfi let 


1940 ELSE 


1950 defaultfi let=f1 lenamest 


1yv6@ END IF 


1970) namet=devicenamese&fi lenamet 

1730 PRINT #menuwindow; * SAVING...’ 

lyy®) = DELEIE names 

2000 UREN _NEW #15, names 

2616 FOR number=1 TO 31 

L020 FUR tstnmum=1 [Tu 7 

2040 PRINT #15; daysdata (number, tstrnum) 
2040 END FUR tstrum 

20580 END FUR number 


2468 LLUSE #15 


2070 END DEFine saver 
2030 DEFIne PRULedure loader 
2090 LULal cht, devicenames, names, fi lenamet 


smumber, tstnum 


2100 INPUT #inputwindow;* Loader - Sure? 


chs 
2116 IF NOT (ch 


> a 
> 


==’y’) THEN RETurn 


2120 PRIN’ #inputwindow;’File Device (defau 
lt-* ;defaultdevice$;*) - *5 

2130 INPUL Finputwindow; devicenames 

2146 IF devicenamet="* THEN 

2156 devi cenames=detau | tdeyvices 


2166. -EESE 


2178 defau | tdevice$=devicenames 


2180 END IF 


2190 INPUT #inputwindow;’File Name - *;f1 


lenames 


2200 defaultfi let$=f1 lenames 

2210 namet=devicenamesé&ti lenames 

2220 PRINT #mernuwindow; *LUADING...’ 
2230 UPEN_IN #15, name¢ 

2246 FOR mumber=1 TO 31 

2250 FOR tstnum=1 TU 7 

2260 INPUT #15; daysdata (number, tstnum) 
2276 END FUR tstnum 

2280 END FOR number 


2290 CLOSE #15 


2306 displayalldata 
2316 CLS #resultswindow 


2326 END DEFine 


loader 


2330 DEFine PROCedure zapper 
23480 REMark remove data 


2350 LUCal chs, 


num, ts trum 


2360 INPUI #inputwindow;’ Zap data - Sure’ 


2 che 


2370 IF NOT (ch#==’y’) THEN RETurn 


2330 resetdata 


2390 defaultfile#=’No file’ 
24060 CLS #resultswindow 
2416 displayal ldata 


2426 END DEFine 


Zapper 


2436 DEFine PROCedure gquiter 
2446 REMark quit program 


2456 LOCal cht 


2466 INPUT #inputwindow;’ Guit Program - Su 


re? *;ch¢ 
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END FUR tn 

2790 CLS #resultswindow 

2300 PRINT #resultswindow;’ Mean and Mode b 
y test’ \? times -* 

2310 FUR tn=1 TO 7 

2820 moda 1=6: occurances=0 

2830 FOR n=1 TO maxlevel 

2340 IF modalval (tn,rn) >occurances THEN 
2850 occurances=modalval (tn,n) 

2360 modal=n 

2370 END IF 

2330 END FOR n 

2390 IF meanval (tn, 2) =6 THEN meanval (tn,2 
d=1 
2900 
(tn, 2)) 
2910 
2920 


IF NOT (ch#=="*y’) THEN RETurn 2/730 
FUR n=3 TO numberotwindows 

CLOSE #n 

2566 END FUR n 

2510 NEW 

2526 END DEFine 

2530 DEFine PRUCedure results 

2546 LOLal tn.n,mean, totali tems, temp, varia 
nce 

2556 PRINT #menuwindow; *’ CALCULA] IN’ \’ RES 
Diets. =.5 

2560 max level=maxval- (minval*® (minval<) ) 
2570 REMark first find mean and mode by f1 
eld & overall. 

2586 DIM meanval (7,2) :REMark ,1 
»,2 15 no of data 1tems 

2590 DIM modaival (7,max level) ,overal Imode ( 


24708 
2486 
2490 


15 total, meanval (tn, 1) = (meanval (tn, 1) /meanval 


round meanval (tn, 1) 
IF modal>maxval THEN modal=-modal+ma 


max level) 

2600 mean=0: totali tems=0 
2610 FUR tn=1 To 7 

2620 FUR n=1 TU 31 

2630 
2640 
2650 


temp=daysdata (nh, tn) 


bat meanval (th, 1) =meanval (tn, 1) +temp 


2660 
2670 
2686 
2690 i 
2700 
) 

2716 
) 

2720 
2730 
2740 
2730 
2760 
2770 


mhean=neant+ temp 
increment totali tems 


increment 


ELSE 


END IF 
END IF 
END FOR n 


two joysticks. One, a Voltmace Delta QL, 
eventually broke; however, it had suffered 
valiantly at the hands of myself and as- 
sorted others who have enjoyed the won- 
ders of Sinclair’s QL. Unfortunately, this is 
no longer available. My present joystick, a 
Wiz Card, is actually more of a cursor pad, 
and I tend to use it more as a mouse substi- 
tute, a job for which itis eminently suitable. 

As Ihave required new languages for my 
course, I have bought the necessary com- 
pilers. This is one of the major benefits of 
the QL. Such compilers are available for 
most of the major languages, and are fairly 
cheap compared to those on other comput- 
ers. I use the Prospero Fortran compiler, 
again bought from Strong Computer Sys- 
tems. It is very good, but requires the sup- 
plied eprom to be present. This means I 
cannot use the QOflash eprom withit. This is 
unfortunate, since it would be useful at 
times to use a ramdisk rather than the disk 
drive with the compiler. It is for this reason 
that I have not invested in a mouse, since I 
prefer not to continually have to fit and 
remove such eproms. I considered one of 
the multi-rom adapters, but they seemed 
expensive. 

I tried some assembly programming, but 
have only written fairly simple programs 
so far,suchas adding new functions, which 
is so easy on the QL. 

Last year I attended one of the Northern 
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IF daysdata (n, tr) <snullval 


increment meanval (tn, 2) 
(temp<@ AND minval<@) THEN 
increment modalval (tn,maxval-temp 


overall Imode (maxval-temp 


increment modalval (tn, temp) 
Increment overa!] lmode (temp) 


xval 
2930 


PRINT #resultswindow; tn; TO 3;meanval 


(tn, 1);TO 7;modal 


2940 
2950 
2960 
29708 


THEN 


2930 
2790 
300U 
temp 
3010 


3020 
3030 
3040 
3050 
3060 


2) 


Computer Shows organised by Sector Soft- 
ware, which was very interesting. I am 
using the Spellbound spelling checker I 
bought there to check this article as I write 
it! Any spelling errors are due to my forget- 
ting to switch it on, rather than any defi- 
ciencies in the software. 

One problem with the hardware I have 
collected is the number of bulky, hot and 
noisy power adapters they require. I have 
alleviated the problems somewhat by fit- 
ting a small shelf on the back of my compu- 
ter desk where they now reside. 

Being diabetic, I keep a daily record of 
my blood glucose levels. I have finally 
begun to computerise these records, which 
allows me to get statistical data about this 
information. This is very useful since try- 
ing to see patterns in a table of figures is 
difficult, and calculating average values 
and so onis very time consuming. None of 
the Psion software seemed quite right for 
this job, since I wanted a full month’s fig- 
ures on screen at once, and to get a plot of 
the values together witha moving average. 
For this reason I wrote a SuperBasic pro- 
gram to do the job. I have included a gen- 
eralised listing of this (listing 1), sinceitmay 
be useful for others, being suitable for any 
integer data input on a daily basis. I have 
also included a short program (listing 2) to 
merge with this to produce the specialised 
version. To create the latter version, first 


temp=mean 
round temp 
PRINT #resultswindow;’ Overall] Mean=’ ; 


END FOR tn 

IF totalitems=@ THEN totalitems=1 
mean=mean/ totali tems 

REMark round mean to nearest integer. 


REMark now get the standard deviation 


Variance=0 

FUR n=1 Tu 31 

FOR tn=1 TO 7 
IF daysdata (nm, tr) <>nullval THEN 
Varilance=variance+ (daysdata (n, tn) * 


load the general version, then merge the 
short program withit. The listings are fairly 
self explanatory, and contain comments. 

Of all the languages I now know, 
Superbasic is probably one of the best. It is 
useful in the same way as the shell lan- 
guage found on Unix systems; for exam- 
ple, to write prototypes. Unlike that, it is 
fairly friendly (in terms of error messages, 
many is the hour I have spent searching for 
anerror which was caused by using acolon 
instead of a semi-colon. The only real prob- 
lem with Superbasic is its speed, but this 
can be improved by using one of the Basic 
compilers available. 

Since speed is not always that important, 
I have not yet bought one of these. It is 
surprising just how many similarities there 
are between the QL and a Unix system, as 
in the use of pipes and multi-tasking. 

The QL was and continues to be an excel- 
lent micro for students and anyone requir- 
ing a useful computer. Just how good it 
was is seen from the fact that although I 
would quite like a better-supported micro, 
there is at the present time no micro more 
suited to my needs than my trusty QL. 

Finally, I have passed my finals, getting 
a First Class Honours degree, and will 
hopefully continue for either a Masters or 
a PHD, and some of the credit must go to 
my QL which was a useful tool and 
teacher! 


37 


3078 END IF 

3680 END FOR tn 

3090 END FOR n 

3100 variance=(variance/totalitems) - (mean 

2) 

3110 PRINT #resultswindow;’ Standard Deviat 

jon’ 

3120 -PRINT #resultswindow;’ (to mean) =’5 
(INT (SQRT (variance) #100) ) /1900 

3130 modal=@-:occurances=0 

3140 FOR n=1 [TU maxlevel 

3156 IF overal Imode (nm) >occurances THEN 

3160 occurances=overa! Imode (n) 

31798 modal=n 

3180 END IF 

3190 END FOR n 

3200 IF modal>maxval THEN modal=-modal+tma 

xval 

3219 PRINT #resultswindow;’ Uverall Mode=’ ; 

modal 

3220 END DEFine results 

323@ DEFine PRUCedure round (x) 

3246 IF x-INT (x) >.5 THEN 

32506 x=INT (x) +1 

3260 ELSE 

3270 x=INT (x) 

3286 END IF 

3290 END DEFine increment 

33006 DEFine PROCedure increment (x) 

3310 x=xtl1 

3320 END DEFine increment 

3330 DEFine PRULedure graphs 

3340 REMark display graph of data, and calc 

ulate moving average. 

3350 LOCal ox,o0y,x,y,n, tn, xstep, lettorigin 

>hiyposn,mvavpar, |oopn,mvavch$, yscale, gmaxv 

al,agminval 

3360 REMark get moving average parameter. 

3370 INPUT #inputwindow;’No. of days for m 

oving average?: * ;mvavch$ 

3338060 IF mvavch#=*’ THEN 

33990 mvavpar=-1 

3400 ELSE 

34106 mvavpar=mvavchs 

3420 IF mvavpar<1 UR mvavpar>31 THEN GU T 

0 3370 

3430 END IF 

34460 CLS #datawindow 

3450 CLS #inputwindow 

3460 INK #datawindow,4 

3470 IF mvavpar<>-1 THEN PRINI #datawindow 

370 9;’Graph with *;mvavpar;*-day moving av 

erage.’ 

3480 AT #datawindow,1/7,2:PRINI #datawindow 
;minval 

3490 AT #datawindow,Y,2Z:-PRINI #datawindow; 

maxval 

3500 AT #datawindow,3, 2:-FRINI #datawindow; 

minval 

3510 AT #datawindow,%, 2:PRINI #datawindow; 

maxval 

3520 AT #datawindow.9,5:-PRINI #datawindow; 

2s eer io ole. Sw MBE? Beuts tao8s 
16% 

3530 AT #datawindow,10,17:PRINT #datawindo 

w;’” (Date)’ 

3540 AT #datawindow,17,5-PRINT #datawindow 
SULA LBAI9N20 V1 22523: 2429: 26 27 26.29 30 
31? 

3550 INK #datawindow,@ 

35606 hiyposn=50 

3570 yscale=50/ (maxval-minval) -REMark y sc 

aling factor 

3580 leftorigin=12 

3590 REMark axis 


a 
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3600 INK #datawindow,4 

3610 REMark y axis 

3620 LINE #datawindow, leftorigin,® TO left 
origin, 100 

3630 REMark dividing line 

3646 LINE #datawindow, leftorigin,hiyposn T 
0 14@,hiyposn . 

3650 REMark upper x axis (y=) 

3660 LINE #datawindow, leftorigin, -minval*y 
scalethiyposn TO 140,-minval*yscalethiyposn 


3670 REMark lower x axis (y=@) 

3630 LINE #datawindow, leftorigin, -minval*y 
scale TO 140,-minval*yscale 

3690 INK #datawindow,® 

3700 xstep=1 

3718 oy=nullval 

3720 FOR n=1 TO 31 

3730 IF (m=17 OR m=1) THEN 

3740 ox=leftorigin 

375¢ x=Ox 

3760 END IF 

3778 FOR tn=1 TO 7 

3730 x=x+xstep 

37990 y=daysdata (n, tr) 

3300 IF oy=nullval AND daysdata (n, tn) <>n 
ullval THEN oy=y-:ox=x 

3316 IF daysdata (n, tm) <snullval THEN 
3820 LINE #datawindow; ox, (oy-minval) *ys 
calethiyposn* (n<17) TO x, (y-minval) *yscalet+ 
hiyposn* (n<17) 

3830 ox=x:Oy=y 

33840 END IF 

3350 END FOR tn 

3860 END FOR n 

3870 REMark calculate & draw moving averag 
e 

3880 IF mvavpar<>-1 THEN 

3390 mvavPpar=mvavpar/2+.5 

3960 INK #datawindow, 2 

3910 ox=leftorigintmvavpar*7-3_5#xstep 
3920 oy=nullval 

3930 FOR loopn=mvavpar TO 32-mvavpar 

3946 movingaverage=0 

3950 number of i tems=0 

3960 FOR n=loopn-mvavpart+i TO loopnt+tmvav 
Par-1 

39708 FOR tn=1 TO 7 

3930 IF daysdata (n, tn) <>nullval THEN 
3999 movingaverage=movingaveragetdays 
data (n, tn) 

4000 increment numberofi tems 

4010 END IF 

4620 END FUR tn 

4030 END FUR n 

4046 x= loopn*7+ leftoriain-16*7* (loopn>=1 
7) -3.5*xstep 

4650 IF numberofitems=0 THEN 

4060 y=oy 

4070 ELSE 

4930 y=movingaverage/number of 1 tems 

4090 END IF 

4100 IF oy=nullval THEN ox=x-:oy=y 

4110 IF numberofitems<>@ THEN 

4126 LINE #datawindow; ox, (oy-minval) #ysc 
alethiyposn* (loopn<17) TO x, (y-minval) *ysca 
lethiyposn* (loopn<17) 

4130 Ox=x:oOy=y 

41406 END IF 

4150 IF INT (loopnm) =16 THEN ox=leftorigin 
4160 END FUR loopn 

4170 INK #datawindow,®@ 

4130 END IF 

4190 PRINT #menuwindow;’ ANY KEY 10’ \’ CONTI 
NUE .«: .* 
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DILWYN JONES COMPUTING 
DJ‘ 41 BRO EMRYS, TAL-Y-BONT, BANGOR, GWYNEDD, WALES LL57 3YT 
Telephone: BANGOR (0248) 354023 


QL SOFTWARE AND COMPUTER SUPPLIES 
QL HOME BUDGET £20.00 
Personal Income Tax calculator and domestic bills and accounts budgeting system. Also does Capital Gains Tax cost 
indexation calculations. Very easy to use. 
QL QUICK POSTERS £10.00 
Make simple text only posters quickly and effortlessly with this handy utility. Designed for use with 24 pin dot matrix printers 
such as the Star LC24-10, the program also works with some laser printers and a few recent 9 pin dot matrix printers, e.g. 
the Star LC10, which can do enlarged text. Facilities supported include NLQ printing, centering of headings, italics, multiple 
fonts, up to 4 text sizes, ornaments such as shadowing and outlining and so on. Send an SAE for full details and a sample 
printout. 
QL VISION MIXER £10.00 
Screen picture display and advertising system. Use mode 4 or 8 QL screens and display them using over a hundred eye- 
catching visual effects, either at random or in a programmed sequence. Uses range from shop window displays to video titling, 
from lectures to show display systems and general information presentation. 
QL BASIC REPORTER £10.00 
SuperBASIC programmer’s aid. Lists variable, procedure and function names with types and line numbers, lines containing 
given keywords, which procedure calls which, sorted lists of machine code extensions with execution addresses etc. Could 
even help you get that magazine listing working! 
QL WORDSCHECK £6.00 
Counts the number of words in a Quill doc file or an ASCII text file and lists all the words used together with how often they 
were all used . 
DiscOVER (by Dave Walker) £20.00 
QL disc format transfer utility. Moves files between QL and PC DOS formats and vice versa. No cables or extra hardware 
required! 
MULTI DiscOVER £30.00 
As above, but a wider variety of disc format transfers, including BBC and CP/M. 


TexTIDY (by Dave Walker) £15.00 
Tidy up text files by converting Quill doc files to plain text files. Also, converts to Wordstar or DOS Quill formats prior to using 
DiscOVER, or to a format suitable for import into Quill when transferred from other wordprocessors. 


NEW!!! DISC BOX DIVIDERS £3 per set of 20 

A great new idea — laminated plastic dividers with wipe clean surfaces and pre-labelled for a variety of topics including, for 
example, ASSEMBLER, BLANK DISCS, COMPILERS, DTP, GAMES, GRAPHICS on one side and blank on the other, so 
you can label the rear with your choice of headings by using a dry marker pen which can be later wiped off if required. These 
are sure to be a popular item for those of us needing to tidily organise our disc collections! 


E MICR Al PRINTER RIBBONS,PRINTER & M 


3.5" DSDD Discs, unbranded SONY/K.A.O. 3.5inch discs £0.75 each 
20 or more unbranded discs 20 or more Sony/K.A.O. discs £0.70 each 
Brand New Microdrive Cartridges Microdrive labels on printer roll, per 100 

Disc labels (per roll of 100) : Disc labels on printer roll, per 100 

Disc box, 10 discs (Ryford) ; Disc box, 40 discs, lockable 

Disc box, holds 80 discs, lockable ; Posso box, holds 160 3.5" discs (drawer type) 

5.25" discs 80 track DSDD Disc box, holds 100 5.25" discs 

Address labels printer roll, per 100 : Wire frame printer stand, paper shelf, white 

Monitor stand, tilt & swivel ' Printer ribbons - phone for prices, stating type 


AUTHORS -— WE ARE LOOKING FOR PROGRAMS TO MARKET — CONTACT US FOR DETAILS ! 


FLOPPY DISCS, MICRODRIVE CARTRIDGES, DISC, MICRODRIVE AND ADDRESS LABELS, PRINTER RIBBONS, 
DISK BOXES, MONITOR AND PRINTER STANDS- SEND AN SAE FORAFULL PRICE LIST, INCLUDING FULL DETAILS 
OF OUR SOFTWARE, OR PHONE FOR PRICES. ALL SOFTWARE |S AVAILABLE ON MICRODRIVE, 3.5"OR 5.25" DISCS 
(DiscCOVER ON DISC ONLY). 


Please add £2 for UK postage and packing, except to software-only orders. Overseas orders - postage charged at cost. Please 
make cheques (Sterling only) payable to DILWYN JONES COMPUTING. Goods remain the property of Dilwyn Jones 
Computing until paid for in full . 
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10 MODE 4 

20 WINDOW 512,256,0,0 
30 PAPER 0O:INK 1:CLS 
40 initialise 

SO start 

60 menu 


Be ROE RE) 
3400 
3410 
3420 
3430 
3440 
3450 
3460 
3470 
3599 
3600 
3610 
3620 
3630 
3640 
3650 
3660 
3670 
3680 
3690 
3700 
3799 
3800 
3810 
3820 
3830 
3840 
3850 
3860 
3870 
3880 
3890 
3900 
3999 
4000 
4010 
4020 
4030 
4040 
4050 
4060 
4070 
4080 
4090 
4100 
4110 
* 29) 
4120 
4130 
4140 


DEFine PROCedure presuf 
CLS#4 

WINDOW#0O ,436,24,39,11 
INPUT#0;"Prefix: ";pre$ 
CLS#0 

INPUT#0;"Suffix: ";suf$ 
CLS#0 

END DEFine 


DEFine PROCedure change_col 
IF fink<+2 
IF fink=4 AND seg<>3*INT(seg) /seg+1 
fink=184:sink=248 
ELSE 
fink=2:sink=208 
END IF 
ELSE 
fink=4:sink=224 
END IF 
END DEFine 


DEFine PROCedure change_bw 
IF fink<>248 
IF fink=120 AND seg< >3*INT(seg) /seg+1 
fink=0:sink=0 
ELSE 
fink=248:sink=248 
END IF 
ELSE 
fink=120:sink=120 
END IF 
END DEFine 


DEFine PROCedure fill_pie 
tempang=2*PI 
INK fink 
ang=ang1:angle:x1=x:yl=y 
IF angi<PI AND ang2>PI:tempang=ang2:ang2=PI 
ang=ang2: angle: x2=x:y2=y 
X3=70+xX1:x4=70+x2 
IF angi<=PI AND ang2<=PI 
IF x3<70 AND x4<70:x3=70 
IF x3>70 AND x4>70:x4=70 
FOR x]=x3 TO x4+.2 STEP -.2 
y3=45+height+SQRT((1-((x-70)/xrad)“*2)*(yrad 


y4=45+height+(x-70) *TAN(ang1) 
y5=45+height+(x-70) *TAN(ang2) 
IF (x1+70»70 AND x2+70>70 AND x<«x2+70) OR ( 


x1+70<70 AND x2+70<70 AND x>x1+70) 


4150 
4160 
4170 
4180 
4190 
4200 
4210 
4220 
4230 
4240 
4250 


g1=PI1 


4260 


BiNK. x. V4 10.75 
ELSE 
LE <3 70 
LINE x,y3 TO x,y4 
ELSE 
LINES; yS TO.ux,¥5 
END IF 
END IF 
NEXT x 
END IF 
IF tempang< >2*PI:ang2=tempang: tempang=ang1:an 


ang=ang1:angle:x1=x:yl=y 


Geoff Wicks 
improves on 
Easel to cut pie 
charts to fit dtp 
documents or 
other uses. 


THREE Dimensional Pie is a program 
which allows you to design pie charts for 
display on the screen or for printing to a 
dot matrix printer. A special feature of the 
program is that the charts can easily be 
entered into documents produced by 
desktop publishing programmes. Pie 
charts can, of course, be produced by 
Easel, but they are rather lifeless. Three 
Dimensional Pie aims to produce better 
pies than Easel and with one exception — 
the program does not support highlighting 
— is more versatile than Easel. 

When you load 3DPie the basic pie 
appears in the centre of the screen. To the 
left is a menu window and to the right a 
status window. Practically all the menus 


THREE DIMENSIONAL PIE 
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4270 ang=ang2:angle:x2=x:y2=y 

4280 x3=70+x1:x4=70+x2 

4290 IF angi>=PI AND ang2>=PI 

4300 IF x3<70 AND x4<70:x4=70 

4310 IF x3>70 AND x4>70:x3=70 

4320 FOR x=x3+.2 TO x4 STEP .2 

4330 y3=45+height-SQRT((1-((x-70)/xrad)*2)*(yrad 


25°), 

make use of the function keys, but if you 4340 y4=45+height+(x-70) *TAN(angi-PI) 
have an averson to this sort of menu, don’t 4350 y5=45+height+(x-70) *TAN(ang2-PI) 
panic. Mnemonics are also used, so you 4360 IF (x1+70¢<70 AND x2+70<70 AND x>x2+70) OR ( 
can get the same result by pressing the x1+70>70 AND x2+70>70 AND x<x1+70) 
initial letter of the menu item. The 4370 LINE x,y4 TO x,y5 
mnemonics work with both upper and 4380 ELSE 
lower case leters — one of the 4390 IF x<70 
advantages of the SELect ON keyword. 4400 LINE x,y4 TO x,y3 

The main menu F1 (or “I” or “i”) is for 4410 ELSE 
Input. Inputting can be done in one of 4420 LINE x,y5 TO x,y3 
three ways and whenyou opt for input you 4430 END IF 
are presented with the input menu: 4440 END IF 

F1 (or “D” or “d”) is for Demo. It uses 4450 NEXT x 
data contained in lines 9940. You could 4460 IF side$="Outline"” 
change these lines to enter your own 4470 INK sink 
ram lata is se yee ne in 4480 FOR x=x1+70.2 TO x2+69.8 STEP .2 
thepie (maximum 12) and the title line a st a“ is AD) * 
9900 the labels, and line 9910 the data. Ba ee ee aa ee 
Line 9930 is for prefix and suffix if 4500 LINE x,y3 TO x,y3-2*height 
seg ieee 4510 NEXT x _ 


F2 (or “M” or “m”) is for Manual. 
Choosing this option opens a window in 
the centre of the screen and you are 
invited to enter the title of your pie. The 
screen is cleared and you can then enter 
your first label followed by the data for that 
label. This process is repeated for a 
maximum of 12 slices. Should you require 


4520 END IF 

4530 END IF 

4540 IF tempang:< >2*PI:angi=tempang: tempang=2*PI 
4550 IF filcol$="Colour ":change_col:ELSE :change_ 
bw 

4560 INK 7 

4570 END DEFine 


4599 : 

4600 DEFine PROCedure move_label 
4610 Lab$="Manual ":Dat$="Manual 
4620 CLS #4 

4630 FOR n = 1 TO seg 

4640 FOR o = 1 TO 2 

4650 IF o=1 

4660 xX=1x%(n) : y=ly%(n) 

4670 ELSE 

4680 x=dx%(n) : y=dy%(n) 

4690 END IF 

4700 INK 2:CURSOR x,y,0,0:print_ld 
4710 OVER 1 

4720 REPeat move_ld 


81989 Geoffrey Wicks 


es 5 4730 key=CODE ( INKEY$(-1) ) 

1 SiS 4740 SELect ON key 

aed 4760 CURSOR x,y,0,0:INK 0O:print_ld: 
yrpad: 28 2:CURSOR x,y,0,0:print_ld 


4770 = 200 


4780 CURSOR x,y.0,.0:INK O:print ld: 
2:CURSOR x,y,0,0:print_ld 


4790 = 208 

4800 CURSOR x,y,0,0:INK O:print_ld: 
2:CURSOR x,y,0,0:print_ld 

4810 = 216 

4820 CURSOR x,y,0,0:INK O:print_ld: 
2:CURSOR x,y,0,0:print_ld 

4830 32:EXIT move_ld 

4840 = 27: menu 

4850 END SELect 

4860 END REPeat move_ld 

4870 OVER “ITsINK 7 

4880 CURSOR x,y,0,0 

4890 IF o=1 

4900 PRINT Label$(n):1x%(n)=x:ly%(n)=y 


Ladet: | 
Date: 


MY 453% 
pie MOVIL 


ine ee 
23 “ 
BOS: mdve_ 
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SUBSCRIBE TODAY! 


Direct to your door at 
NO EXTRA COST* 
— we pay the post! 


for Sinclair QL Users — : 

bi Never again worry 
| yer! about your local 
t newsagent selling out. 


: | ) Avoid any price 

ARCADE Grins : increases for the next 14 

IN SUPERBASIC oa an 
“a issues by subscribing. 


Take advantage of this offer today, simply fill in the coupon below and send 
it with your remittance to: M.S.M. Subs. Dept., Lazahold Ltd, P.O. 
Box 10, Roper Street, Pallion Ind. Estate, Sunderland SR4 
6SN. 


The first issue of a new subscription to be delivered will be one or two issues 
after the one you placed your order in. 


* Overseas prices include postage 


Please send me one year’s subscription to Sinclair QL World. (14 for the price 
of 12). | enclose my cheque/money order for £______ made payable to 


MCPC LIMITED or debit my Access/Visa card. Offer closes 16th November 1990 
Card No. SDT ETE TT EEEEIIIET expiry dote SOOT 


U.K.: £21.00; EUROPE: £24.70; MIDDLE EAST: £25.80; FAR EAST; £27.60; 
REST OF WORLD: £26.20 or USA: $45.00 


Airmail rates available on request 


Intel 80C88 at 4.9152Mhz 
Compatible with MS-DOS 2.11 
256K containing BIOS, operating system 
and applications suite 
128K with an internal RAM disk, configurable from 
8K. Externally expandable to 640K RAM 
63 keys, QWERTY, IBM PC BIOS compatible. 
Buried numeric pad and function keys. Optional key click 
Extended IBM ASCII (255 characters) 
credit card sized memory cards (32K or 
64K or 128K RAM) 

Graphics LCD, supertwist technology, MDA com- 
patible, 40 columns x 8 lines, 240 x 64 pixels (with the 
option to window a full 80x 25 character display) 
Keyboard controlled contrast 

60 pin expansion BUS to take serial and 
parallel ports and memory expansion units 
8" x 4"x 1" (200mm x 105mm x 29mm) 
495 grammes (with batteries) 
calendar and diary, address and phone 
book, Lotus 1-2-3 compatible spreadsheet, text processor, 
communications software 


In addition to the excellent software built-in to the Portfolio Free 
of Charge (see right), other software and peripheral products, such 
as the sophisticated Pocket Finance package and serial/centronics 
interfaces are available. And it doesn’t stop there. Many manufac- 
turers have recognised the potential of the Portfolio and have 
already started to design new peripherals and software. Products 
currently under development include: Serial interface with built 
in mini modem, Apple Macintosh interface, business, utility and 
programming software plus a range of adventure and battle 
strategy games. For further free details on the Portfolio range, fill 
in the coupon below and return it to Silica Systems now. 


fal 
cr) 


ILICA SYSTEMS 


Silica have been established for over 12 years, and 
have an annual turnover of £13 million. With our 
unrivalled experience and expertise, we can now 
claim to meet our customers requirements with an 
understanding which is second to none. But don't 
just take our word for it. Complete and return the 
coupon now, for our latest Free literature and begin 
to experience the “Silica Systems Service’ 


OFF [2 R 


FREE OVERNIGHT COURIER DELIVERY: On all hardware orders shipped in the UK 
TECHNICAL SUPPORT HELPLINE: Team of Atari technical experts at your service. 
PRICE MATCH: We normally match competitors on a ‘Same product - 
ESTABLISHED 12 YEARS: Proven track record in professional computer sales. 

£13m TURNOVER (with 60 staff): Solid and reliable with maintained growth 
BUSINESS/EDUCATION/GOVERNMENT: Volume discounts available for large orders. 
SHOWROOMS: Demonstration and training facilities at our London & Sidcup branches. 
THE FULL STOCK RANGE: All of your Atari PC requirements from one supplier. 

FREE CATALOGUES: Will be mailed to you with offers and software/peripheral details 
PAYMENT: By cash, cheque and all major credit cards. 

CREDIT PAYMENT TERMS: Silica are licensed credit brokers - details on request 

Before you decide when to buy your new Atari Portfolio, we suggest you think very carefully about WHERE you 
buy it. Consider what it will be like a few months after buying your Portfolio, when you may require additional 
peripherals or software, or help and advice with your new purchase. And, will the company you buy from contact 
you with details of new Portfolio products? At Silica Systems, we ensure that you will have nothing to worry about 
Silica Systems is a new division of Silica Shop, the UK's leading Atari specialists. This new division has been 
established to provide a service to the more serious home user, as well as to business and education purchasers. 


SILICA 
SYSTEMS 
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To get you started, Portfolio comes with a suite 
of five useful functions built-in, all accessible 
from a simple menu display. 


TIME MANAGER 
More than just an electronic diary, the Portfolio 
Time Manager enables you to plan your ap- 
pointments via a comprehensive calendar and 
diary. It can even be programmed to sound an 
audible alarm at specific times to remind you 
of important appointments. 


CALCULATOR 
Your Portfolio will be invaluable in the office or 
at home as a powerful pocket calculator. It has 
a full range of functions, including factorial 


MEMORY CARDS 
Portfolio can store and retrieve data and programs from 
its own RAM, or from small credit card size memory cards, 
that slot into its built-in card drive. The cards are available 
in three sizes, 32K, 64K and 128K, so you can carry a library 
of data in your pocket. The card drive also accepts ROM 
cards, which can contain commercial or custom software. 


YOu 


Same price’ basis 


The new Portfolio from Atari is the world’s first pocket- 
sized electronic organiser that is also a powerful PC 
compatible computer, with a full QWERTY keyboard 
and scrolling 80x25 character display. 


Portfolio includes everything you would expect from an 
electronic organiser - an address and telephone book, 
time manager, diary and sophisticated calculator. 


Portfolio also includes several functions that you would 
not expect - a spreadsheet for your personal budget 
and expense records, as well as a text processor for 
typing memos and letters. 


And, because Atari’s Portfolio is PC compatible, it can 
communicate with your desktop PC at home, or in the 
office. You can transfer files from one to the other, to 
enable you to update your reports and figures with the 


MAIL ORDER: 


Order Lines Open: Mon-Sat_ 9.00am- -6.00pm 


LONDON SHOP: 
__ Opening Hours 

SIDCUP SHOP: 
Opening Hours: 


BUSINESS/EDUCATION: 


Order Lines Open: Mon-Fri 9.00am-6.00pm 


Portfolio while you are on the move. 


BUILT-IN APPLICATIONS 
TO GET YOU ORGANISEDs 


power and root calculations, all with multi 
display formats and memories 


ADDRESS BOOK & DIALLER 
Portfolio has a complete address book facility 
that allows you to store hundreds of addresses 
and phone numbers. And, at the touch of a but- 
ton, you can retrieve any one of them, or search 
for a specific grouping, such as “‘all Italian 
restaurants’. And, when you are ready to book 
your table, hold your Portfolio to your telephone 
mouthpiece and use its special built-in tone 
dialler to dial the number for you 


TEXT PROCESSOR 


The Portfolio's built-in text processor program 


POWER SUPPLY 
Portfolio is powered by three AA batteries which will run 
for up to six weeks with normal use, or from the mains us- 
ing an adaptor. All the peripherals take their power from 
the Portfolio, so no extra batteries or adaptors are required. 
A ‘battery-low' warning and memory back-up ensure that 
information is not lost when the batteries are changed. 


includes word wrap, line and column counf, 
string search, in fact most of the functions you 
would find in a word processor. It handles 
printer and word processor control codes and 
allows easy transfer of files between Portfolio 
and your desktop PC 


SPREADSHEET 

For real calculating power, Portfolio has a Lotus 
1-2-3 compatible spreadsheet built-in. It has 
127 columns x 225 rows and reads/writes Lotus 
V1.0 and V2.01 files, so you can transfer data 
to and from Lotus 1-2-3 on your desktop PC. 
The Portfolio’s 256K ROM includes MS-DOS 
and PC BIOS compatible systems software. 


JNTERFACES & PERIPHERALS 

Portfolio can communicate with other computers and sup- 
ports a growing range of peripherals via a built-in 60 pin 
bus connector. Peripherals available include serial and 
parallel interfaces and memory expanders (to 640K). You 
can also add a card drive to your desktop PC, to enable 
it to read/write to Portfolio’s cards. 


1-4 The Mews, Hatherley Rd, Sidcup, Kent, DA14 40x jel: 081: 309. 1111 
No'Late Night Opening 


Mon-Sat _9.30am-6.00pm 


52 Tottenham Court Road, London, W1P OBA 


Late Night: Thursday until 8pm 


Fax No: 071-323 4737 


Tel: “oT 580 | 4000 


Mon-Sat 9.00am-5.30pm 


1-4 The Mews, Hatherley Rd, Sidcup, Kent, DA14 4DX Tel: 081-302 8811 
Late Night: Friday until 7pm 


Fax No: 081-309 0017 


1-4 The Mews, Hatherley Rd, Sidcup, Kent, DA14 4DX Tel: 081-308 0888 


Closed on Saturdays 


Fax No: 081-308 0608 


— ee 
To: Silica Shop Ltd., Dept QLW 11/90-38, 1-4 The Mews, Hatherley Road, Sidcup, Kent DA14 4DX 


i 


Mr/Mrs/Ms 


Initials Surname 


Address 


Tel (Home) 
Company Name 


{ Which computer(s), if any, do you own? 
E E 
a 


at may change 


Postcode 


Tel (Work) 


ee ee 


for the latest informat 


4910 ELSE 

4920 PRINT pre$;num(n);suf$:dx%(n)=x:dy%(n)=y 
4930 END IF 

4940 NEXT o 


4950 NEXT n 
4960 view_pie 
4970 END DEFine 


4999 : 

5000 DEFine PROCedure print_ld 

$010 IF o=1 

5020 PRINT Label$(n) 

5030 ‘PRINT#SS, “LABEL ne": °";Labeas(n), “x2 3s, ¥ 
ae ay 

5040 ELSE 


S050 PRINT pre$;num(n) ;suf$ 

5060 PRINT#4,"DATA ";n;": ";pre$;num(n);suf$,"x: 
13 0 ese aee 

5070 END IF 

5080 END DEFine 

5199 : 

5200 DEFine PROCedure design 

5210 WINDOW#0, 260,146,129,70:CLS#0: BORDER#0 ,2,248 
5220 AT#0,1,8:PRINT#0, "BORDER", ,borcol$ 

5230 AT #0,2,8:PRINT#0, "EFFECT", ,effect$ 

5240 AT#0,3,8:PRINT#0, "SIDE/BASE" ,side$ “4 
5250 AT#0,4,8:PRINT#0,"FILL", ,filcol$ 

5260 AT#0,6,8:PRINT#0, "LABELS", , Lab$ 

5270 AT#0,7,8:PRINT#0, "DATA", ,Dat$ 

5280 AT#0,9,8:PRINT#0,"1st DRIVE" ,d1$ 

5290 AT#0,10,8:PRINT#0,"2nd DRIVE" ,d2$ 


5300 INK#0,7:AT#0,12,5:PRINT#0,"PRESS INITIAL LETT 
ER TO CHANGE"\" "ESC' TO RETURN": INK#O, 
4 


5310 REPeat loop 


5320 key=CODE(INKEY$(-1) ) 

5330 SELect ON key 

5340 = 27:menu 

5350 =, 61,423: STOP 

5360 = 66,98 

5370 IF borcol$="0n ":borcol$="0ff":borcol=0:EL 


SE borcol$="0n ": borcol=7 


5380 AT#0,1,8:PRINT#0, "BORDER", , borcol$ 

5390 BORDER 1,borcol 

5400 = (69), LOF 

5410 IF effect$="Solid ":effect$="Shadow": ELSE 


urvescaueetae " 


5420 AT #0,2,8:PRINT#0, "EFFECT", ,effect$ 
5430 = 63,115 

5440 IF side$<>"Outline" 

5450 IF side$="Stipple” 

5460 side$="Solid ":bcol=7 

5470 ELSE 

5480 side$="Outline”:bcol=0 

5490 END IF 

5500 ELSE 

5510 side$="Stipple":bcol=248 

5520 END IF 

5530 AT#0,3,8:PRINT#0, "SIDE/BASE",side$ 
5540 = v0), LOZ 

5550 IF filcol$<>"Outline" 

5560 IF filcolg="Colour " 

5570 filcol$="B/W "-fink=248 

5580 ELSE 

5590 filcol$="Outline” 

5600 END IF 

5610 ELSE 

5620 filcol$="Colour “:fink=2:sink=208 
5630 END IF 

5640 AT#0,4,8:PRINT#0, "FILL", ,filcol$ 
5650 = 76,108 

5660 Datlab$=Lab$:datlab:Lab$=Datlab$ 


less than 12 slices, pressing Enter when 
you are asked for the label will allow you to 
leave the sequence. (If you wish to have 
four segments, enter the label and data 
for each of the segments but, when asked 
to input the fifth label, just press enter). 

F3 (or “I” or “i”) is for Import. This option 
allows you to import data from the Psion 
programs. There are two_ import 
routines built into 3DP. The program first 
assumes that you are importing from 
Easel and tests for this. If the import is not 
successful it is aborted and a second 
routine is tried which assumes you are 
importing from Abacus by column. The 
importing routines have been kept as 
simple as possible and may not work in 
every case. If your attempted import fails, 
use the manual option which is simple and 
quick. 

F2 (or “A” or “a”) is for Alter. This allows 
you to change the design of the pie. On 
choosing this option you are presented 
with the alter menu: 


F1 (or “H” or “h”) to alter the Height. 
F2 (or “X” or “x”) to alter the X-radius. 
F3 (or “Y” or “y”) to alter the Y-radius. 


These three options all work in the 
same way. You alter the value by means 
of the up and down cursor keys. The 
altered value can be followed in the status 
window. When you have the value you 
require you press Space and the pie is 
redrawn using your new values. The 
permitted ranges are: 


Height: 0-30 
X-rad: 10-50 
Y-rad: 5-35 


You will need to experiment to get the best 
values for your pie. Themore “elliptical” 
your ellipse is, the greater theimpression 
of depth. Unfortunately although your pie 
will be, mathematically speaking, 
correctly sliced, it may not look right. For 
example a 10% slice may look larger than 
a 15% slice. The nearer to a circle your 


Ist 


Average gas consumption per 
quarter. 
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Average gas consumption per 
month. 


ellipse is, the less distortion there is. Itis a 
question of choosing the best 
compromise. If you are disappointed with 
the design in out line mode, persevere. 
Often the effect is much better when the 
pie is filled in. It also helps if you keep the 
height small. 

F4 (or “D” or “d”) is for Design. When 
you choose this option a window opens in 
the centre of the screen in which the 
Design Menu is displayed. The menu 
works entirely by mnenomics. 

Border switches the border on and off. 
You will see this happening as you press 
the key. If you intend to use your pie ina 
desktop publishing program, you may find 
it better to switch the border off. 

Effect toggles between Solid and 
Shadow. Solid draws a complete pie. 
Shadow gives the effect of a floating circle 
with its shadow underneath. 

Side/Base toggles between Outline, 
Stipple and Solid. Outline uses the same 
colours for the base and the sides as fill 
(see below). Stipple colours them in a 
black and white stipple and Solid in white. 

Fill toggles between Outline, Colour 
and B/W. Outline is the default mode and 
draws the pie in outline form. Colour fills in 
the pie in colour and B/W in black and 
white. The former gives a better result if 
you want to view the pie on the screen or 
to photograph it; the latter is better for use 
in desktop publishing. 

Becuse some unusual shapes have to 
be filled in, the fill routine is the 
slowest part of the program. You are 
advised to design your pie first in outline 
form and add the colour as the last 
feature. The colouring in is done in either 
two or three different colours. The choice 
is made automatically so that no adjacent 
segments are in the same colour. The one 
exception is a pie of seven segments 
where slices one and seven are in the 
same colour. 

Labels and Data both toggle between 
Inside, Outside, None and Manual. There 
are a number of labelling possibilities and 
the detailed use of these options is 
described in detail below. 

One and two allow drive 1 and drive 2 to 
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5670 ~ AT#HO ,6,8:PRINT#0, "LABELS", , Lab$ 


5680 = 68,100 

5690 Datlab$=Dat$:datlab:Dat$=Datlab$ 
5700 AT#0,7,8:PRINT#0,"DATA", ,Dat$ 
S710 = 49,33 

S720 AT#0,9,24: INPUT#0,d1$ 

5730 = 50,64 

5740 AT#0,10,24: INPUT#0,d2$ 


5750 END SELect 

5760 END REPeat loop 

5770 END DEFine 

5799 : 

5800 DEFine PROCedure datlab 
5810 IF Datlab$<>"Outside” 
5820 IF Datlab$<>"Inside " 
5830 IF Datlab$="None sb 


5840 Datlab$="Manual " 
5850 ELSE 

5860 Datlab$="Inside " 
5870 END IF 

5880 ELSE 


5890 Datlab$="Outside" 
5900 END IF 

5910 ELSE 

5920 Datlab$="None 
5930 END IF 

5940 END DEFine 
5999 

6000 DEFine PROCedure import 
6010 CLS#4 

6020 WINDOW#0, 436,24,39,11 
6030 PRINT#0,"LOAD "&d2$ 
6040 AT#0,0,5:INPUT#0, load$ 


6050 IF load$="":AT#0,0,10:INPUT#0, load$: load$=d2 


$kloadg$ 
6060 d2$=load$(1 TO 5) 


6070 IF load$(LEN(load$)-3 TO )<>"_exp":load$=load 


$&"_exp" 


6080 IF load$=d2$&"_exp":CLS#0:RETurn 
6090 Title$=load$(6 TO LEN(load$)-3) 


6100 count=0:counti=-1:ag="" 
6110 OPEN_IN#7, load$ 

6120 REPeat in 

6130 key=CODE(INKEY$(#7) ) 


6140 IF EOF(#7) :CLOSE#7:RETurn 


6150 SELect ON key 


6160 = 10 

6170 IF count>0:num(count)=a$ 

6180 seg=count:count = count+l 

6190 IF count< >counti:CLOSE#7:EXIT in 

6200 ag=""" 

5210 = 34:IF a$<«>"":Label$(count)=a$:ag="":count 
l1=counti+1 

6220 = 45 TO 122:a$=a$&CHR$ (key) 

6230 = 44:ag="" 


6240 END SELect 

6250 END REPeat in 

6260 count=13:ag$="" 

6270 OPEN_IN#7, load$ 

6280 REPeat in 

6290 key=CODE(INKEY$(#7) ) 
6300 IF EOF(#7):EXIT in 
6310 SELect ON key 


6320 = 10:count=0 

6330 = 34:IF a$<«>"":Label$(count-12)=a$:ag=""" 
6340 = 45 TO 122:a$=a$&CHR$ (key) 

6350 IF count<13:num(count+1)=a$:seg=count+l 
6360 = 44:count=count+1:ag="" 


6370 END SELect 
6380 END REPeat in 
6390 CLOSE #7 


45 


46 


6400 END DEFine 

6599 : 

6600 DEFine PROCedure manual a 
6610 WINDOW#0 , 260,146,129, 70: CLS#0 : BORDER#0 , 2,248 / 
6620 AT#HO,0,1:INPUT#0,"TITLE: ";Title$:CLS#0 { 
6630 PRINT#0,\,," LABEL", , "VALUE" 

6640 FOR n=1 TO 12 

6650 PRINT#0,n 

6660 seg=n \ 
6670 AT#0,n+1,16: INPUT#0, Label$(n) \ 
6680 IF Label$(n)="":seg=n-1:RETurn N. 
6690 AT#0O,n+1,32: INPUT#0,num(n) 

6700 NEXT n 

6710 END DEFine 

6799 : 

6800 DEFine PROCedure save_pie 

6810 CLS#4 

6820 WINDOW#0, 436,24,39,11 

6830 PRINT#0,"SAVE "&d2$ 

6840 AT#0,0,5:INPUT#0,save$ 

6850 IF save$="":AT#0,0,10: INPUT#O, save$:save$=d2 
$&save$s 

6860 d2$=save$(1 TO 5) 

6870 CLS#0 

6880 IF save$=d2$:RETurn 

6890 PRINT#0,"INVERSE (Y/N)?" 

6900 key$=INKEY$(#0,-1) 

6910 CLS#0 

6920 PRINT#4,Titie$ 

6930 IF key$=="Y"': WINDOW 512,256,0,0:RECOL 7,0,0,0 
{0-8 00 

6940 SBYTES save$,131072,32768 

6950 18) key$=2"Y""sRECOL .7;,0.,0,0,,0,0,0.,0 

6960 END DEFine 

6999 : 

7000 DEFine PROCedure label_pie 

7010 ang=ang3 

7020 angle 

7030 x=70+x:y=45+height+y 

7040 IF ang3<PI:y=y-4:ELSE :y=y+16 

7050 IF ang3>PI/2 AND ang3<3*PI/2:x=x+2:ELSE :x=x- 
6 

7060 IF Lab$="Inside ":1x%(n)=x:ly%(n)=y 

7070 IF Dat$="Inside '':dx%(n)=x:dy%(n)=y-4 

7080 IF ang3<PI:y=y+14:ELSE :y=y-20-2*height 

7090 IF ang3>PI/2 AND ang3<3*PI/2:x=x-3:ELSE :x=x+ 
2 

7100 IF Lab$="Outside":1x%(n)=x:ly%(n)=y 

7110 IF Dat$="Outside":dx%(n)=x:dy%(n)=y-4 

7120 END DEFine 

7199 : 

7200 DEFine PROCedure alter 

7210 CLS#5 

7220 PRINT#S,;\ " MENU"\\" F1 HEIGHT"\\" F2 X-RA 


D"\\" F3 Y-RAD"\\" F4 DESIGN"\\" FS TITLE" 


7230 REPeat loop 

7240 key=CODE(INKEY$(-1)) 

7250 SELect ON key 

7260 = 232, 72, 104:n=height:min=0:max=15:f$="H" 
:ypos=3:EXIT loop 

7270 = 236, 88, 120:n=xrad:min=10:max=S50:f$="X": 
ypos=4:EXIT loop 

7280 = 240, 89, 121:n=yrad:min=5:max=35:f$="Y":y 
pos=5:EXIT loop 

7290 = 244, 68, 100:design:RETurn 

7300 = 248, 84, 116:CLS#4:WINDOW#0 ,436,24,39,11: 
INPUT#0O,” ";Title$:CLS#0:RETurn 

7310 = 27:menu:RETurn 

7320 = 161,243: STOP 

7330 END SELect 


Average gas consumption per 
quarter. 

be changed. The new drive is directly 
inputted onto the screen. Drive 1 is used 
for initial loading and loading gprint_prt. 
Drive 2 for saving. If you wish to change 
the default drives this can be done by 
altering line 9620. 

When you have completed your design 
changes you can leave the design menu 
by pressing ESC. 

F5 (or “T” or “t”) is for Title. When you 
choose this option, the present title is 
erased and you are invited to enter the 
new title. This title appears precisely in 
theplace that it will in the finished screen 
so you can place it accurately in relation to 
the pie. 

We now return to the main menu. 

F4 (or “S” or “s”) is for Save. The pie is 
redrawn and at the top of the screen you 
are invited to enter the filename. The 
default drive is displayed and if you do not 
wish to alter this just press enter and then 
enter your filename. You are then asked if 
you wish to invert the image. The screen 
is then aved. Should you wish to use your 
picture in desktop publishing you should 
remember that the screens in these 
programs are smaller than the full QL 
screen and some experimentation or 


Average gas consumption per 
month. 


Sinclair/QL World November 1990 


ee 


improvement with a graphics program 
such as Eye-Q may be necessary. It is 


7340 END REPeat loop 


also advisable to inverse the screen 7350 CLS#5 
before saving. 7360 PRINT#5S;\" ALTER"\\" WITH"\\" ® ANDJ"\\ 
F5 (or “D” or “d”) is for Dump. The pie is “ THEN"\\" PRESS"\\" SPACE" 


7370 REPeat loop 
7380 key=CODE(INKEY$(-1) ) 
7390 SELect ON key 


redrawn, gprint_prt is loaded and a hard 
copy of the pie is made. Should you wish 
to use a different screen dump then 


change line 8480 of the program. 7400 = 32:EXIT loop 
“Q” or “q” is for Quit. Its use in thi or in at 7410 = 208:n=n+1 
almost any part of the program allows to 7420 = 216:n=n-1 


7430 END SELect 

7440 IF n>max:n=min 

7450 IF n¢«min:n=max 

7460 AT#6,ypos,8:PRINT#6, " " 
7470 AT #6,ypos,8 

7480.> LF '€S="H" 

7490 PRINT#6, 2*n 

7500 ELSE 

7510 PRINT#6,n 

7520). END IF 

7530 END REPeat loop 

7540 IF f$="H":height=n 

7550 IF f£$="X":xrad=n 

7560 IF f$="Y":yrad=n 

7570 view_pie 

7580 REPeat loop 

7590 IF CODE(INKEY$(-1))=27:menu 
7600 END REPeat loop 

7610 END DEFine 


leave the program. 

“L" or “I” or “P” or “p” is for Label or 
Prefix Suffix. 

“M”" or “m” is for Move. 

Both of these options are covered 
below in the section on labels. 

ESC can be used almost anywhere in 
the program to return to the main menu. If 
you make a mistake and press the wrong 
key so that you enter either the import 
routine or the save routine, you can leave 
both routines by pressing ENTER twice 
and then ESC once. 

There are two sorts of labels in the 


FLeo. 2 

7800 DEFine PROCedure data_in 

7810 CLS#5S 

7E2Z0)PRINT#S eh MENU"\\" F1 DEMO"\\" F2 MANUAL 


*"\\" F3 IMPORT" 

7830 REPeat loop 

7840 key=CODE(INKEY$(-1) ) 
7850 SELect ON key 


7860 = -82,213<SiTOP 
7870 = 27:menu 

MAR 7880 = 232, 68, 100:initialise:demo:view_pie 
7890 = 236, 77, 109:initialise:manual:view_pie 
7900 = 240, 73, 105:initialise:import:view_pie 


Average gas consumption per 


month. 7910 END SELect 


7920 END REPeat loop 

7930 END DEFine 

7999 : 

8000 DEFine PROCedure view_pie 

8010 CLS:CLS#4 

8020 PRINT#4,Title$ 

8030 IF Title$="NO DATA LOADED": RETurn 

8040 draw_pie 

8050 tot=0:ang2=0 

8060 FOR n=1 TO seg:tot=tot+num(n) 

8070 num1=0 

8080 FOR n=1 TO seg 

8090 numl=numi+num(n)/tot 

8100 num2=numi-num(n)/(2*tot) 

8110 angi=ang2 

8120 ang2=num1*2*PI 

8130 ang3=num2*2*PI 

8140 IF filcol$<«>"Outline"”:fill_pie 

8150 slice_pie 

8160 END FOR n 

8170 IF filcol$<>"Outline” 

8180 INK 7:FILL O 

8190 ELLIPSE 70,45+height,xrad,yrad/xrad,PI/2 
8200 IF sideg$="Outline" AND "Effect$"="Solid 
8210 LINE 70+xrad,4S5-height TO 70+xrad,45+height 
8220 LINE 70-xrad,45-height TO 70-xrad,45+height 
8230 END IF 


3Dpie. In default mode the title of a 
segment, label, is printed outside thepie 
and the value of the segment, data, is 
printed inside. The default options can be 
changed using the alter menu. The pie 
can also be drawn without either the data 
or the label displayed. 

You may wish to add a prefix (eg “£”) or 
a suffix (eg “%") to the data. This is done 
by pressing “L” or “I, for Label or “P” or 
“p” for Prefix/Suffix. You can then enter 
the required characters at the top of the 
screen. 


Labels 


The printing positon of the labels will 
rarely be correct, although the computer 
will hazard a guess which in most cases 
will be approximately right. You can 
however change the display position: first 
of all press ESC to access the main menu 
and then F2 to draw the pie. You then 
press “M” or “m’” to move the labels. The 
label of the first segment will change from 
white to red and can be moved around the 
screen using the cursor keys. 
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8240 END IF quarter. 
8250 FOR n=1 TO seg 

8260 PAPER 0O:INK 7:OVER O pa pe 

8270 IF Lab$<>"None ":CURSOR 1x%(n),ly%(n),0,0: napertsy ie 
PRINT Label$(n) yr Ist Pei 
8280 IF Dat$<>"None "*: CURSOR dx%(n) ,dy%(n) ,0,0: “ 471% N 


PRINT pre$;num(n);suf$ P 
8290 NEXT n rs 
8300 END DEFine 

8399 : 

8400 DEFine PROCedure choice 
8410 REPeat loop 

8420 key=CODE(INKEY$(-1)) 
8430 SELect ON key 


8440 = 232, 73, 105:data_in 

8450 = 236, 86, 118:view_pie 

8460 = 240, 65, 97:alter 

8470 = 244,83,115:view_pie:save_pie 

8480 = 248,68,100:view_pie:a=RESPR(1400) :LBYTES 


di$&"gprint_prt",a:CALL a 


8490 = 27:menu 

8500 = 81,113:STOP 

8510 = 77,109:move_label 
8520 = 76,80,108,112:presuf 


8530 END SELect 

8540 END REPeat loop 

8550 END DEFine 

8599 

8600 DEFine PROCedure start 

8610 WINDOW 454,240,31,10:BORDER 1,7 

8620 OPEN #4,scr_:WINDOW#4 ,448,24,33,11:BORDER#4,6 
8630 CSIZE#4,1,0:INK#4, 7 

8640 PRINT#4, "THREE DIMENSIONAL PIE", ,1989 Geoffr 
ey Wicks" 

8650 WINDOW 454,240,31,10:BORDER 1,7 

8660 draw_pie 

8670 END DEFine 

8799 

8800 DEFine PROCedure menu 

8810 OPEN#S,scr_:WINDOW#5, 75,146,48,70:BORDER#5,2 


When the label is in the correct position 
press space and the colour returns to 
white. The data now changes to red and 
so the process is repeated for each of the 
segments until the pie is completed. It is 
important to bear in mind thatin a large pie 
the positon of the label can be outside the 


, 234: CLS#S 
8820 CSIZE#5,0,0:INK#5,4 
SSS0<PRINTES .3\"~"" MENUS NN FL MINPUDONA 82 VIEW” 


\\" FS: ALTER’ \\" F4 SAVE"\\" ES: DUMP" 

8840 OPEN#6,scr_:WINDOW#6, 75,146,395, 70:BORDER#6,2 
,234:CLS#6 

8850 CSIZE#6,0,0: INK#6,4 

SSGU-PRINT#S, \ “STATUS AY" Bt ON" eH eads NS yerad 
EY Labels?" pata: ANY Dis eh peace” 

8870 AT#6,3,8:PRINT#6,2*height:AT#6,4,8:PRINT#6,xr 
ad: AT#6,5,8:PRINT#6, yrad 

8880 AT#6,7,8:PRINT#6,Lab$(1):AT#6,8,8:PRINT#6, Dat 
$(1):AT#6,10,5:PRINT#6,d1$:AT#6,11,5:PRINT#6,d2$ 
8890 choice 

8900 END DEFine 

8999 : 

9000 DEFine PROCedure angle 

9010 ang=2*PI+ang 

9020 x=SQRT(yrad*2/((1/COS(ang) *2)-1+(yrad*2/xrad” 
vf 

9030 y=SQRT(xrad*2/((1/SIN(ang) *2)-1+(xrad*2/yrad* 
zor) 

9040 ang=ang-2*PI 

9050 IF ang>PI/2 AND ang<=PI:x=-x 

9060 IF ang>PI AND ang<=3*PI/2:x=-x:y=-y 

9070 IF ang>3*PI/2 AND ang<=2*PI:y=-y 

9080 END DEFine 

9199 : 

9200 DEFine PROCedure slice_pie Average gas consumption per 
9210 FOR slice=1 TO 2 quarter. 
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screen and thus cannot be seen. 
If this happens do not panic. The 


position co-ordinates are displayed at the 9220 IF slice=1:ang=ang1:ELSE :ang=ang2 
top of the screen and you will see them 9230 angle 
change with the use of the cursor keys. 9240 x=70+x: y=45+height+y 
Eventually the label will be printed in the 9250 LINE x,y TO 70,45+height 
screen area. When this routine is used the 9260 IF ang>PI AND effect$="Solid ":LINE x,y TO x, 
label and data options on the design y-2*height 
menu are changed to manual and remain 9270 NEXT slice 
so until changed or until fresh data is 9280 label_pie 
loaded. You can leave the routine at 9290 END DEFine 
anytime by pressing ESC 9399 : 
When put into writing this procedure 9400 DEFine PROCedure draw_pie 
appears unwieldly and complicated. In 9410 IF effect$="Shadow":r=2+INT(height/5):ELSE :r 
practice it is not, and it works smoothly =0 
and quickly. 9420 INK bcol:FILL 1 
This, in summary, is the recommended 9430 ELLIPSE 70+2*r,45-height-r,xrad,yrad/xrad,PI/ 
working order: 2 
1) Load the relevant data into the 9440 INK 7:FILL O 
programme. — 9450 IF effect$="Solid " 
2) Alter the height, x-radius and y-radius 9460 ELLIPSE 70,45-height,xrad,yrad/xrad,PI/2 
3) Add the prefix or suffix to the data label 9470 INK bcol:FILL i 
is required. 9480 LINE 70+xrad,45-height TO 70+xrad,45+height 
4) Alter the approximate _ labelling 9490 LINE 70-xrad,45-height TO 70-xrad,45+height 
position if a different one from the default 9500 END IF 
position is required. 9510 INK O:FILL 1 
5) Move the labels to the exact position 9520 ELLIPSE 70,45+height,xrad, yrad/xrad,PI/2 
pn bea , ; 9530 INK 7:FILL 0 
lai ema ha vote 9540 ELLIPSE 70,45+height,xrad, yrad/xrad,PI/2 
| hope averse using the rogram as oot FY Sete ee eee sf 
ge igets ei ceseiann tebe 9560 LINE 70+xrad,45-height TO 70+xrad,45+height 
; Joy 9 ) 9570 LINE 70-xrad,45-height TO 70-xrad,45+height 
: 9580 END IF 


9590 END DEFine 
9599 : 
9600 DEFine PROCedure initialise 


9610 bcol=0 

9620 dig$="mdv1_":d2$="mdv2_":Lab$="Outside”:Dat$=" 
Inside ":pre$="":suf$="" 

9630 height=15:xrad=40: yrad=20 

9640 Title$=""NO DATA LOADED" 

9650 DIM num(12):DIM Label$(12,12) 
9660 DIM 1x%(12):DIM ly%(12):DIM dx%(12):DIM dy%(1 
2) 

9670 borcolg$="0n ":borcol=7 

9680 effect$="Solid " 

9690 side$="Outline” 

9700 filcol$="Outline” 

9710 END DEFine 

9799 : 

9800 DEFine PROCedure demo 

9810 RESTORE 9890 

9820 READ seg,Title$ 

9830 FOR n=1 TO seg 

9840 READ Label$(n) 

9850 END FOR n 

9860 FOR n=1 TO seg 

9870 READ num(n) 

9880 END FOR n 

9890 DATA 4,"AVERAGE GAS CONSUMPTION PER QUARTER ( 
1984 - 1988)" 

9900 DATA “iet!.,”2nd'*, "Sra". 4th" 
9910 DATA 47.1,14.8,7.4,30.6 

9920 tot=num(1)+num(2)+num(3)+num(4) 
9930 suf$="%" 

9940 END DEFine 

10000 STOP 

10001 DEFine PROCedure update 

10002 DELETE mdv2_3Dpie 

10003 SAVE mdv2_3Dpie 

10004 END DEFine 
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MICRO ADS 
MICRO ADS 
MICRO ADS 
MICRO ADS 


THOR2F colour monitor, microdrives with 
Xchange, Speedscreen £475. Epson 
LQ500 24 pin with sheet feeder £175 
Text87v3, Founted89, 2488 £45 
MetaComco Lattice C £40. Allabove £695 
Tel. Cobham (0932) 64915 

LOW DISTORTION colour differenti- 
ated screen dumps: Serial 8056 (£4.99) 
Serial 8056 (Sideways) (£4.99) Star LC10 
colour (£4.99). Send Microdrive(s) plus 
payment to “Quality Traders” 65 Thurstable 
Road, Tollgsbury, CM9 8SF 

USER FRIENDLY menu driven 
progams: Spectragraphqlarsd £14.99(3D 
Graphics). Mandqelbrotplus £4.99 
(Madelbrot Graphics). Send Microdrive(s) 
plus payment to “Quality Trader", 65 
Thurstable Road, Tollesbury CM8 8SF 


ABC Elektronic 
010 49 521 890381 


Care Electronics 

0923 672102 

General software including Tony 
Tebby programs. 

Thor International 

010 4533 930305 

010 4533 937544 

Digital Precision 

081-527 5493 

Discs, interfaces, drives, keyboards, 
RAM expansions. 


EEC Ltd 
0753 888866 
QLs, peripherals, accessories 


Miracle Systems 

0904 423986 

Trump Card interface, modems, 
hard disc drive. 


Strong Computer 
Systems 

0267 231246 

Sector Software 
0772 454328 

Peripherals. 

TF Services 

01 724 9053 

Repairs, spares, peripherals. 
TK Computerware 
0303 812801 


QL REAL TIME DIGITIZER 


Digitize moving pictures in real time. Transforms QL into a 

video printer or 3-D image digitizer via a video camera 

* Digitizes in .02 secs. 

* 256x256 resolution in 8 levels 

* Full, '/. or 4x '/. screen modes 

* Screen update - 5 or 2.7 frame/sec 

* 1:1 grey level 9-pin printer dump. 

* Interfaces to QL and multitasks 

* Runs on unexpanded QL and multitasks 

* Cost: £123.00 incl. State mdv or fip 

CL SYSTEMS, 403 CHAPTER ROAD, DOLLIS HILL 

LONDON NW2 5NG TEL: 081 459 1351 
EUROWORD Text Handler, Type, edit 
save, print documents in English, French 
German, Spanish, Italian, Polish, Greek 
Scandinavian, Serbo-croat and RUSSIAN 
Easy keying for all characters. Multi-task- 
ing. Prints to Epson compatible 9-pin 
dot-matrix printers. On3.5" disc. £15.50.G 
Jackson, 14 Castle Road, Whitby, YO21 
3NJ. Tel. 0497 603839 


. NV. L.S. 
Tel No: 0742 884183 


Open till 11pm 
3-5" DS/DD Disks 40p 
5.25"DS/DD Disks 30p 


Postage and Packing 7p per 
disk (maximum postage 
£3.50). Cheques/PO’s 

payable to: 
C.V.LS. 
92 Firtree Estate, Thurgoland 
Sheffield S30 7BG 
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HARDWARE SERVICES 


Adman Services 

0952 255895 

Joe Atkinson 

35 Ravelagh Road, London W5 5RJ 
Roms and spares 


Suredata 
081-902 5218 
Repairs. 


QL World 

(reader services) 
Subscriptions 

091 510 8787 (Lazerhold) 
Microdrive Exchange 

0772 454328 (Sector) 

Recent back issues : write to editor 
Old back issues 0802 834765 (TIL) 


Quanta 

User Group, support. 

Hon. secretary, Phil Borman. 
0933 460690 


Xchange User Group 
Freepost 

Beckenham 

Kent BR3 2BR 


SOFTWARE 


Athene Consultants 
0705 511439 


ARK Distribution 

0983 79496 

Archivist, Master Spy and other 
business and utility software. 


QL ROMS AND SPARES 
ROMS, MGE (Spanish, MGF (French), MGG 
on JS (English), £20 each. JM (English), 

1 


MDVS. Complete QL MDV Subunit £20, head 
and chassis £10, Microswitch £2, Motor £6. 
Rubber & Plastic Roller £2. MDV2 Stand-off 
spacer + srew £2. ULA £5. Tr 4,5,6,7 set £2. 
MDV pcb inc, ULA £11. Prices include UK 
postage. Send SAE for price list of all QL spares. 
Joe Atkinson, 36 Ranelagh Road, Ealing, 
London W5 5RJ (Mail Order Only). 


PRINTER ribbons re-inked. black £2.00 
Multi colour £3.00. Postage on all ribbons 
50p each. Payments to J.G. Wilkinson, 5 
Peach Rd, Coxford, Southampton SO1 
6FZ 

WANTED CST disk interface with manual 
in good working order. Write or phone 
0405 761285. Dennis Clark, 40 Henry 
Street, Goole DN14 6TG 

FOR SALE, QL Computer with Philips 
mono monitor, 768K Trump card, 2x5.25" 
disc drives, centronics interface, compu- 
ter one assembler, monitor, PCB1, many 
discs, microdrives, books and magazines 
offers. Tel (0484) 548951 


*** FLIGHTDECK *** 


* The Jet Airliner Simulator the QL has been 
waiting for !!! 
* Machine Code high resolution shaded 
graphics 
* Accurate Database of 25 major UK airports 
and over 200 navigation beacons 
* As Reviewed in “Sinclair QL World”, 
December 1989 
* New Low Price £15.00 inc P&P on 3.5" Disk 
or Microdrive 
Cheque / PO to: 
DELTASOFT 
11 Dumaine Avenue, Stoke Gifford 
Bristol, BS12 6XH 


Call Us What You Like 
55 Greenan, Shaws Road, Belfast 
BT11 8LX. No telephone. Superspy. 


Care Electronics 

0924 672102 

Tony Tebby software. Miracle 
hardware, peripherals, utilities. 


CGH Services 

055934 574 

Adventures. QLAF Compware 

0270 582301 

Task Swopper, Mega Toolbox, Expert 
System Shell and others. 


Creative Codeworks 
021 426 5199 
Speedscreen. 


Digital Precision 

081-527 5493 

Turbo Basic compiler, Desktop 
Publisher, Editor, Eye-Q Graphics. 
Sprite generator, Super Forth, Better 
Basic, Professional and Super 
Astrologer, Media Manager, 
Supercharge, Blocklands, Driodzone, 
Aracadia, Reversi, Backgammon, 
Master Bridge Tutor, C-M Emulator, C 
compiler, Lightning speed enhancer. 


DJW Software 
0256 881701 
Home Banker 


Eidersoft 
089283 2552 
Games utilities, Ice. Pyramide. 


ImaQLate Software 

42 Albion Street, Broadstairs, Kent 
CT10 1NE. 

Biograph. 

PDQL 

021 200 2313 


General business and utilities 
applications. 


Fi 


MICRO ADS 
MICRO ADS 
CLASSIFIED 


If you would like to place a 
Classified Advertisement in 
the next issue of Sinclair/QL 
World, address it to: 

Jason Newman, 
Sinclair/QL World, 

Panini House, 

116/120 Goswell Road, 
London EC1 

on a plain piece of paper. 
Please also print your name, 
address, and daytime 
telephone number. 


The cost of 1-30 words 
inclusive is £15. Prepayment 
is not enecessary as you will 
be invoiced for the sum of 


£15 following publication. 
Settlement of the invoice will 
be required within 30 days of 
receipt. 


QL Supersoft 
0256 475992 
Home Budget, Superdraw. 


Rob Roy Software 

94 Teignmouth Road, Clevedon, 
Avon BS21 6DR. 

Rob Roy and Palantir. 


Sector Software 

0772 454328 

Flashback and other utilities. 
Peripherals. 


SD Microsystems 

0462 422897 

Business software including 
General Ledger. Small Traders’ 
Pack/Invoicer and Stock 
Accounting. 


Software 87 

33 Savernake Road, London NW3 
2JU 

Text 87 and updates. 


Talent Software 
0303 813883 
Utilities, games. 


Thornado Systems 
010 062 577244 
Thor systems, software, support. 


TK Computerware 
0303 812801 
Add-ons, spares, software. 


WD Software 
0534 81392 
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Flight of Fantasy is the very latest Amiga 500 pack from Commodore, 
featuring BRAND NEW software releases, to make this the most spec- 
tacular ASOO pack ever! The pack features the Amiga 500 computer 
with mouse controller and TV modulator, as well as four top software 
titles. These include the follewing: 


The ultimate in flight simulation with a choice 
of two aircratt and four battle environments 
with dozens of different tactical missions. 
Aerial combat, strategic bombings, interac- 
tive ground based battles, seagoing carriers 
... the list of features is endless. Real time 
cockpit displays, including ‘true radar’ 
enhance the realistic feel of this stunning 
‘simulation 


The high quality graphics program that 
set the standard for other Amiga art 
packages. Deluxe Paint II includes 
powerful, easy to use tools that bring 
out the artist in you Create master- 


Here's something completely different 


The Commodore A500 Batman Pack must 
surely rank as one of the most popular com- 
puter packs ever! The pack features the 
Commodore Amiga 500 computer with 
mouse controller and TV modulator, plus 
four top software titles. The software in 
cludes: ‘Batman The Movie’ - Rid Gotham 
City of the cunning joker, in Ocean's top 
selling title based on the blockbuster Bat 
man film; New Zealand Story - high quali 
ty conversion of the leading arcade game 
Interceptor - Dogfight with two F-16's in 
this leading flight simulator; Deluxe Paint 
il - top quality Amiga graphics package 
which set the standard for others to follow. 
Return the coupon for further details 


PACK INCLUDES: 
A500 Computer & Mouse £399.99 
A520 TV Modulator £24.99 
Batman The Movie £24.95 
New Zealand Story £24.95 
Interceptor £24.95 
Deluxe Paint Il £49.95 


TOTAL RAP: £549.78 
Less Pack Saving: £150.78 


PACK PRICE: £399.00 


For the more serious or professional applica- 
tions user, Commodore have a selection of 
systems based around the expandable Amiga 
2000, at prices from £1295+VAT. The A2000 
features a full 1Mb RAM (expandable to 9Mb), 
9 system expansion slots, plus IBM com- 
patibility with the use of PC-XT or PC-AT 
bridgeboards. Complete and return the 
coupon, putting a tick 

in the A2000 box, for 

details of A2000 com- 


puter systems. +VAT= £1489.25 


ILICA SHOP 


OFFE 


On all hardware orders shipped in the UK 
Team of Amiga technical experts at your service 
We normally match competitors on a 


Same product - Same price 


basis 


MAIL ORDER: 
LONDON SHOP: 


Sat 9.30ar 


SIDCUP SHOP: 


Mon-Sat 9.00ar 
g 


1-4 The Mews 


t 9.00am 


52 Tott tent vam Court 


1-4 The en 


5.30pr Late Nigh 


1-4 The Mews Hatherley Rd, Sidcup, Kent 


~ a science fiction story with comic 
book style graphics. Our heroes Jake 
and Duke are on the Planet X rescu- 
ing Humans who have been captured 
by the Robot Monsters and forced to 
Create an evil Robot Army to DESTROY 
EARTH! Jake and Duke fight their way 
through hordes of evil Robots to help 
the Humans escape. 


Slip on your magic shoes, practise 
throwing a rainbow and you're ready 
to go island hopping. From the Isiand 
of Doh to Monster Isiand, you will en- 
counter Doh himself, stinging insects, 
lethal combat machines, mechanical 
assailants, the formidable beings of 
legend and fotklore. Finally enter the 
world of darkness and its inhabitants. 


Late Night Ope: 


t: Friday ur 


Hatherley Rd, Sidcup Kent 


pr N 


wip OBA 


ntil 8pm Fax N 


Road London, 


ate Night: Thursday un 


Hatherley Rd, Sidcup Kent, 


PACK INCLUDES: 
A500 Computer & Mouse £399.99 
A520 TV Modulator £24.99 
Deluxe Paint Il £49.95 
Escape/Robot Monsters £19.99 
Rainbow Islands £24.95 
F29 Retaliator £24.95 


TOTAL RAP: £544.82 
Less Pack Saving: £14582 


PACK PRICE: £399.00 


Tel: 081-309 1111 


N 61-308 0608 
Tel: 071-580 4000 
No: 071-323 4737 
DA14 4DX Tel: 081-302 8811 


Fax No: 081-309 0017 


DA14 4DX_ Tel: 081-308 0888 


No: 081-308 0608 


DA14 4DX 


. ‘ BUSINESS/EDUCATION: 
Proven track record in professional computer sales. je nes Open: Mon-F 
Solid and reliable with maintained growth 
Volume discounts available for large orders 
Demonstration and training facilities at our London & Sidcup branches 
All of your Amiga requirements from one supplier 
Will be mailed to you with offers and software/peripheral details. 
By cash, cheque and all major credit cards 
Silica are licensed credit brokers 


To: Silica a Ltd., Dept QLW 11/90-32, 1-4 The Mews Motel Road ee Kent DA14 4DX 


AMID | 


N i i \ | TV] 


return coupon for details 


Mr/Mrs/Ms Initials Surname 
Jecide when to buy your new Amiga computer, we suggest about WHERE 
sider what it will be like a months after buying your 4 a 
sottware, or help and advice with your new purchase. Ar t Address 
w products? At Silica Shop, we ensure that you will he e 
for over 12 years, and h yal turnover of £13 m € 
we an now aim to meet tomers requi ents with a 
t just take our word for it 
»w for our latest Free literature a ’. ~y 
RETURN THE COUPON NOW FOR Postcode Te’ 


FREE BROCHURES 


A l Which computer(s), if any, do you own? A2000 


7 SHOP 


BRAND NEW 
MICRODRIVE CARTRIDGES 
£2.00 EACH ANY QUANTITY 


Sector Software 


The best programs and peripherals for the QL 


QZ/QL to Z88 File Transfer 
Software and cable to connect the Z88 and OL and 
transfer any files between them. Includes Archive to 
Pipedream and back conversion routines. £25 


Amiga to Z88 File Transfer 
Software and cable to connect the Z88 and Amiga and 
transfer any files between them £25 


Spellbound 

A spelling checker that checks your spelling AS YOU 
TYPE. Based on a 30,000 word dictionary, works with 
Quill or The Editor V1.17 onwards on the expanded 
QL. £30 


Taskmaster 

A brilliant multitasking front end system which lets you 
use the QL as a serious machine. Multitask many 
programs at once. £25 


Files 2 

File handling utility with scores of features. Written 
by Peter Jeffries. Ideal enhancement for Taskmaster 
users. £12 


Write Turn 

Turn spreadsheets and documents on their sides with 
this excellent utility, works on Epson and compatible 
printers. £12 


QL World Index 

A complete index to the contents of QL World from 
its start to May 1988. Find articles and reviews in 
seconds, 160K+ of data compressed to fit into a 


128K QL. £6 
Flashback 

A very fast and slick database which has very few 
limitations. Will also convert Archive files. £25 


Flashback Special Edition is a greatly advanced 
version with lots of extra features including report 
generator, mail merge, label printing, etc. £40 


Touch Typist 
Excellent typing tutor that works. 200 lessons, graph 
of your progress, adjustable difficulty levels. ......... £12 


Ferret 

Find lost files fast with this file search utility which 
will read all your files on disk or mdv looking for a 
match with your search text. £12 


STD Index 
This index to all the dialling codes in the country 
executies from disk in 15 seconds. Know the place 
and it will tell you the number, know the 

number and it will tell you the place! 

{Expanded QOL only.) 


BN 
aaa 


£12 


@ sector Software 


Page Designer 2 

This is a full feature desktop publisher that has to be 
seen to be believed. Ask for full details of this system 
and its support programs. £35 


Phillips CM8833 Colour Stereo 


Monitor 
A stereo monitor for the OL, Amiga, ST or almost any 
computer. £260 


Don't miss the 
5th Northern Home 


Computer Show 


(Christmas Special) 
Saturday 1st December 1990 


Stokes Hall 

Church Road 
Leyland 

Lancashire 


This is the fifth show organised by Sector Software with 
100's of bargains for the computer-user from around 30 
exhibitors. We are planning to make the best we have 
organised in the North West. Meet Sector Software, 
Digital Precision, Miracle Systems, EEC, as well as your 
other favourite QL companies all under one roof for a 
great day out. If you have a computer then you cannot 
afford not to be there. 


Stokes Hall is about 2 miles from Junction 28 of the Mé 
(Leyland turnoff) or from Leyland Train Station, local sign 
posts will mark the way. Admission for adults is £1 .50, 
children £1.00 and under 10's free. Bar and restaurant 
facilities will be available as usual throughout the day. 


Ring Sector Software on 0772 452414 for more details 
and a free map of how to get there. Stalls are available for 
£50.00 or £65.00 if electricity is required. 


Unit 13, Centurion Way Industrial Estate, Farington, Leyland, Lancs. PRS 2GU 
Tel: (0772) 454328/452414 (2 lines), Fax: (0772) 454680 


